Skip to content

Commit a7efc5e

Browse files
committed
miscellaneous changes
1 parent b816b47 commit a7efc5e

File tree

8 files changed

+55
-47
lines changed

8 files changed

+55
-47
lines changed

Changes

Lines changed: 21 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1,17 +1,31 @@
11
Change history for Perl extension PDF::Table.
2+
* = work in progress
23

3-
=== Version 1.008 (2025-03-25) UNRELEASED
4+
=== Version 1.008 (2025-05-14) UNRELEASED
45

56
* all Deprecated items updated
67

7-
* consolidate A/B choice in lib/PDF/Table/ChooseDriver.pm
8+
* consolidate A/B choice in lib/PDF/Table/ChooseDriver.pm and t/ and
9+
examples/
10+
11+
MANIFEST, MANIFEST.SKIP (remove), SECURITY.md (new)
12+
Address Kwalitee issues: unhappy with MANIFEST.SKIP (remove from MANIFEST,
13+
erase MANIFEST.SKIP), add SECURITY.md with contact address per Builder.
14+
Doesn't like .perl-version and .perlcritic, but won't say what's wrong.
15+
At this time, unable to add "provides" per Builder at this time, as unlike
16+
Builder, META.yml and META.json are auto-built and not manually provided.
17+
18+
t/lib/PDFAPI2Mock.pm
19+
Add mediabox() to dummy stubs so that t/PDF-Table.t can still run
20+
21+
Change distribution (CPAN owner) to PMPERRY from OMEGA
822

923
=== Version 1.007 (2025-03-25)
1024

1125
devtools/PDFversion.pl, devtools/TableBuild.pl, util/3_examples.pl
12-
Updated to modern Perl standards to make 1_pc.pl PerlCritic happy.
26+
Updated to modern Perl standards to make 1_pc.pl (PerlCritic) happy.
1327

14-
lib/PDF/Table.pm
28+
lib/PDF/Table.pm, lib/PDF/Table.pod
1529
Permit 'trans' or 'transparent' background color (mostly for overriding
1630
a default bg color). Per #80 (reported by @az143).
1731

@@ -20,6 +34,9 @@ Change history for Perl extension PDF::Table.
2034
code to show effect in colspan example. Per #78 (reported and fix
2135
supplied by @BlueWlvrn).
2236

37+
LICENSE, version, INFO/Table.html, README.md
38+
Update for new release and copyright year.
39+
2340
=== Version 1.006 (2024-03-21)
2441

2542
devtools/*

MANIFEST

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -24,9 +24,9 @@ lib/PDF/Table/Settings.pm
2424
LICENSE
2525
Makefile.PL
2626
MANIFEST
27-
MANIFEST.SKIP
2827
PDFpref
2928
README.md
29+
SECURITY.md
3030
t/Basics.t
3131
t/Colspan.t
3232
t/lib/PDFAPI2Mock.pm

MANIFEST.SKIP

Lines changed: 0 additions & 31 deletions
This file was deleted.

SECURITY.md

Lines changed: 23 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,23 @@
1+
# Security Policy for PDF::Table
2+
3+
## Reporting security issues
4+
5+
**Do not report security problems on public forums or in repository issues.**
6+
7+
Privately report vulnerabilities to the maintainers listed at the end of this document. Include as many details as possible to reproduce the issue, including code samples or test cases. Check that your report does not expose any of your sensitive data, such as passwords, tokens, or other secrets.
8+
9+
You do not need to have a solution or fix. Depending on the issue, CPANSec may be notified.
10+
11+
You can also privately report issues to the CPAN Security Group (CPANSec) cpan-security@security.metacpan.org. This is especially important if you think a vulnerability is being actively exploited. CPANSec may report the issue to the relevant authorities. See [Report a Security Issue](https://security.metacpan.org/docs/report.html).
12+
13+
## Response to reports
14+
15+
The maintainers aim to respond to all reports within one day, but this may be affected by life and other things that happen to people who maintain open source code.
16+
17+
A new release will be provided as soon as possible. In the meantime, a workaround or code patch may be provided, if deemed adequate for the purpose.
18+
19+
## Maintainers
20+
21+
Phil M Perry, phil4597@catskilltech.com
22+
23+

devtools/PDFversion.pl

Lines changed: 2 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -1,8 +1,6 @@
11
#!/usr/bin/perl
2-
use strict;
3-
use warnings;
4-
5-
#my $ourLAST = 1; # T: change my $LAST_UPDATE to our $LAST_UPDATE
2+
use strict;
3+
use warnings;
64

75
my $src = $ARGV[0]; # directory root to work in for this call
86
my $VERSION = $ARGV[1]; # version to use (e.g., 3.005)
@@ -70,9 +68,6 @@ sub update_version {
7068
while ($line = <$IN>) {
7169
# $line still has line-end \n
7270
$line =~ s/$pattern/$newVer/;
73-
#if ($ourLAST) {
74-
# $line =~ s/^my \$LAST_UPDATE/our \$LAST_UPDATE/;
75-
#}
7671
print $OUT $line;
7772
}
7873

lib/PDF/Table.pm

Lines changed: 5 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -812,8 +812,11 @@ sub table {
812812
unshift @$rows_height, $header_min_rh;
813813

814814
$first_row = 1; # Means YES
815-
# Roll back the row_idx because a new header row added
816-
$row_idx--;
815+
# Roll back the row_idx because a new header row added,
816+
# unless it was the header itself that overflowed. NOTE that
817+
# this will still produce a partial header on the first page,
818+
# and a full header on the second page!
819+
$row_idx-- if $row_idx > 0;
817820
}
818821

819822
}

lib/PDF/Table.pod

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -230,7 +230,7 @@ See the "Column.pl" example on PDF::Builder for some examples.
230230
Automatic cell sizing will not work with this, so you need to use the
231231
C<size> table parameter to specify relative cell widths.
232232

233-
B<End of PDF::Builder ONLY:>
233+
B<End of PDF::Builder ONLY>
234234

235235
For full C<%settings> description see section L</Table settings> below.
236236

t/lib/PDFAPI2Mock.pm

Lines changed: 2 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -72,8 +72,9 @@ BEGIN {
7272

7373
package PDF::API2::Page; ## no critic
7474
our @ISA = 'Mock';
75-
__PACKAGE__->factory( 'PDF::API2::Content', 'gfx' );
75+
__PACKAGE__->factory( 'PDF::API2::Content', 'gfx' );
7676
__PACKAGE__->factory( 'PDF::API2::Content::Text', 'text' );
77+
sub mediabox { return (0,0, 612,792) }
7778

7879
package PDF::API2::Content; ## no critic
7980
our @ISA = 'Mock';

0 commit comments

Comments
 (0)