Script 'mail_helper' called by obssrc
Hello community,

here is the log from the commit of package perl-PDF-API2 for openSUSE:Factory 
checked in at 2021-04-22 18:04:45
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-PDF-API2 (Old)
 and      /work/SRC/openSUSE:Factory/.perl-PDF-API2.new.12324 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-PDF-API2"

Thu Apr 22 18:04:45 2021 rev:22 rq:887829 version:2.040

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-PDF-API2/perl-PDF-API2.changes      
2021-03-06 21:19:32.405287137 +0100
+++ /work/SRC/openSUSE:Factory/.perl-PDF-API2.new.12324/perl-PDF-API2.changes   
2021-04-22 18:06:22.378735232 +0200
@@ -1,0 +2,17 @@
+Wed Apr 14 03:09:09 UTC 2021 - Tina M??ller <timueller+p...@suse.de>
+
+- updated to 2.040
+   see /usr/share/doc/packages/perl-PDF-API2/Changes
+
+  2.040     2021-04-13
+      - Fix open() followed by stringify() resulting in a corrupt 
(mostly-empty)
+        PDF, which was broken by changes in 2.039 (reported by Gareth Tunley).
+      - [RT #134993] Calling open($filename) followed by saveas($same_filename)
+        instead of update() resulted in a corrupt PDF in 2.039, which no longer
+        reads the entire file into memory on open (reported by Marco Pessotto).
+      - [RT #134957] Fix encoding of \n in a PDF string containing 
non-printable
+        characters (reported by Stuart Henderson).
+      - [RT #133131] Fix endianness of 64-bit numbers in cross-reference stream
+        widths array (reported by Christopher Papademetrious, fix by Vadim 
Repin).
+
+-------------------------------------------------------------------

Old:
----
  PDF-API2-2.039.tar.gz

New:
----
  PDF-API2-2.040.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-PDF-API2.spec ++++++
--- /var/tmp/diff_new_pack.hjR8Qo/_old  2021-04-22 18:06:22.898736093 +0200
+++ /var/tmp/diff_new_pack.hjR8Qo/_new  2021-04-22 18:06:22.898736093 +0200
@@ -18,7 +18,7 @@
 
 %define cpan_name PDF-API2
 Name:           perl-PDF-API2
-Version:        2.039
+Version:        2.040
 Release:        0
 Summary:        Facilitates the creation and modification of PDF files
 License:        LGPL-2.1-or-later

++++++ PDF-API2-2.039.tar.gz -> PDF-API2-2.040.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/Changes new/PDF-API2-2.040/Changes
--- old/PDF-API2-2.039/Changes  2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/Changes  2021-04-13 17:19:19.000000000 +0200
@@ -1,3 +1,19 @@
+2.040     2021-04-13
+
+    - Fix open() followed by stringify() resulting in a corrupt (mostly-empty)
+      PDF, which was broken by changes in 2.039 (reported by Gareth Tunley).
+
+    - [RT #134993] Calling open($filename) followed by saveas($same_filename)
+      instead of update() resulted in a corrupt PDF in 2.039, which no longer
+      reads the entire file into memory on open (reported by Marco Pessotto).
+
+    - [RT #134957] Fix encoding of \n in a PDF string containing non-printable
+      characters (reported by Stuart Henderson).
+
+    - [RT #133131] Fix endianness of 64-bit numbers in cross-reference stream
+      widths array (reported by Christopher Papademetrious, fix by Vadim 
Repin).
+
+
 2.039     2021-03-04
 
     - PDF::API2->open($filename) no longer reads the entire file into memory
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/META.json new/PDF-API2-2.040/META.json
--- old/PDF-API2-2.039/META.json        2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/META.json        2021-04-13 17:19:19.000000000 +0200
@@ -47,7 +47,7 @@
          "web" : "https://github.com/ssimms/pdfapi2";
       }
    },
-   "version" : "2.039",
+   "version" : "2.040",
    "x_generated_by_perl" : "v5.28.1",
    "x_serialization_backend" : "Cpanel::JSON::XS version 4.09",
    "x_spdx_expression" : "LGPL-2.1"
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/META.yml new/PDF-API2-2.040/META.yml
--- old/PDF-API2-2.039/META.yml 2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/META.yml 2021-04-13 17:19:19.000000000 +0200
@@ -20,7 +20,7 @@
   perl: v5.10.0
 resources:
   repository: git://github.com/ssimms/pdfapi2.git
-version: '2.039'
+version: '2.040'
 x_generated_by_perl: v5.28.1
 x_serialization_backend: 'YAML::Tiny version 1.73'
 x_spdx_expression: LGPL-2.1
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/Makefile.PL 
new/PDF-API2-2.040/Makefile.PL
--- old/PDF-API2-2.039/Makefile.PL      2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/Makefile.PL      2021-04-13 17:19:19.000000000 +0200
@@ -24,7 +24,7 @@
     "Test::Exception" => 0,
     "Test::Memory::Cycle" => 0
   },
-  "VERSION" => "2.039",
+  "VERSION" => "2.040",
   "test" => {
     "TESTS" => "t/*.t"
   }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/README new/PDF-API2-2.040/README
--- old/PDF-API2-2.039/README   2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/README   2021-04-13 17:19:19.000000000 +0200
@@ -1,5 +1,5 @@
 This archive contains the distribution PDF-API2,
-version 2.039:
+version 2.040:
 
   Facilitates the creation and modification of PDF files
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Annotation.pm 
new/PDF-API2-2.040/lib/PDF/API2/Annotation.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Annotation.pm       2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Annotation.pm       2021-04-13 
17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Basic::PDF::Utils;
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Array.pm 
new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Array.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Array.pm  2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Array.pm  2021-04-13 
17:19:19.000000000 +0200
@@ -13,7 +13,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 =head1 NAME
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Bool.pm 
new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Bool.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Bool.pm   2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Bool.pm   2021-04-13 
17:19:19.000000000 +0200
@@ -12,7 +12,7 @@
 
 use strict;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 =head1 NAME
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Dict.pm 
new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Dict.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Dict.pm   2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Dict.pm   2021-04-13 
17:19:19.000000000 +0200
@@ -13,7 +13,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 our $mincache = 16 * 1024 * 1024;
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/File.pm 
new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/File.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/File.pm   2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/File.pm   2021-04-13 
17:19:19.000000000 +0200
@@ -10,7 +10,7 @@
 
 use strict;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 =head1 NAME
 
@@ -1168,9 +1168,9 @@
     return unpack('n', $data)       if $width == 2;
     return unpack('N', "\x00$data") if $width == 3;
     return unpack('N', $data)       if $width == 4;
-    return unpack('Q', $data)       if $width == 8;
+    return unpack('Q>', $data)      if $width == 8;
 
-    die "Invalid column width: $width";
+    die "Unsupported xref stream entry width: $width";
 }
 
 sub readxrtr {
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Filter/ASCII85Decode.pm 
new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Filter/ASCII85Decode.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Filter/ASCII85Decode.pm   
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Filter/ASCII85Decode.pm   
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub outfilt {
     my ($self, $str, $isend) = @_;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Filter/ASCIIHexDecode.pm 
new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Filter/ASCIIHexDecode.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Filter/ASCIIHexDecode.pm  
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Filter/ASCIIHexDecode.pm  
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 # Maintainer's Note: ASCIIHexDecode is described in the PDF 1.7 spec
 # in section 7.4.2.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Filter/FlateDecode.pm 
new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Filter/FlateDecode.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Filter/FlateDecode.pm     
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Filter/FlateDecode.pm     
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use POSIX qw(ceil floor);
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Filter/LZWDecode.pm 
new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Filter/LZWDecode.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Filter/LZWDecode.pm       
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Filter/LZWDecode.pm       
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub new {
     my ($class, $decode_parms) = @_;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Filter/RunLengthDecode.pm 
new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Filter/RunLengthDecode.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Filter/RunLengthDecode.pm 
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Filter/RunLengthDecode.pm 
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 # Maintainer's Note: RunLengthDecode is described in the PDF 1.7 spec
 # in section 7.4.5.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Filter.pm 
new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Filter.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Filter.pm 2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Filter.pm 2021-04-13 
17:19:19.000000000 +0200
@@ -11,7 +11,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Basic::PDF::Filter::ASCII85Decode;
 use PDF::API2::Basic::PDF::Filter::ASCIIHexDecode;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Literal.pm 
new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Literal.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Literal.pm        2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Literal.pm        2021-04-13 
17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 
 use strict;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Basic::PDF::Filter;
 use PDF::API2::Basic::PDF::Name;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Name.pm 
new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Name.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Name.pm   2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Name.pm   2021-04-13 
17:19:19.000000000 +0200
@@ -12,7 +12,7 @@
 
 use strict;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 =head1 NAME
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Null.pm 
new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Null.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Null.pm   2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Null.pm   2021-04-13 
17:19:19.000000000 +0200
@@ -12,7 +12,7 @@
 
 use strict;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 =head1 NAME
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Number.pm 
new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Number.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Number.pm 2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Number.pm 2021-04-13 
17:19:19.000000000 +0200
@@ -12,7 +12,7 @@
 
 use strict;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 =head1 NAME
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Objind.pm 
new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Objind.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Objind.pm 2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Objind.pm 2021-04-13 
17:19:19.000000000 +0200
@@ -11,7 +11,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 =head1 NAME
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Page.pm 
new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Page.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Page.pm   2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Page.pm   2021-04-13 
17:19:19.000000000 +0200
@@ -13,7 +13,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Basic::PDF::Dict;
 use PDF::API2::Basic::PDF::Utils;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Pages.pm 
new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Pages.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Pages.pm  2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Pages.pm  2021-04-13 
17:19:19.000000000 +0200
@@ -13,7 +13,7 @@
 
 use base 'PDF::API2::Basic::PDF::Dict';
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Basic::PDF::Array;
 use PDF::API2::Basic::PDF::Dict;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/String.pm 
new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/String.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/String.pm 2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/String.pm 2021-04-13 
17:19:19.000000000 +0200
@@ -12,7 +12,7 @@
 
 use strict;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 =head1 NAME
 
@@ -191,12 +191,12 @@
         return "<FEFF$str>";
     }
     else {
-        if ($str =~ m/[^\n\r\t\b\f\040-\176\200-\377]/oi) {
-            $str =~ s/(.)/sprintf('%02X', ord($1))/oge;
+        if ($str =~ m/[^\n\r\t\b\f\040-\176\200-\377]/) {
+            $str =~ s/(.)/sprintf('%02X', ord($1))/sge;
             return "<$str>";
         }
         else {
-            $str =~ s/([\n\r\t\b\f\\()])/\\$out_trans{$1}/ogi;
+            $str =~ s/([\n\r\t\b\f\\()])/\\$out_trans{$1}/g;
             return "($str)";
         }
     }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Utils.pm 
new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Utils.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Basic/PDF/Utils.pm  2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Basic/PDF/Utils.pm  2021-04-13 
17:19:19.000000000 +0200
@@ -10,7 +10,7 @@
 
 use strict;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 =head1 NAME
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Content/Text.pm 
new/PDF-API2-2.040/lib/PDF/API2/Content/Text.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Content/Text.pm     2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Content/Text.pm     2021-04-13 
17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub new {
     my ($class) = @_;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Content.pm 
new/PDF-API2-2.040/lib/PDF/API2/Content.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Content.pm  2021-03-04 18:11:07.000000000 
+0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Content.pm  2021-04-13 17:19:19.000000000 
+0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw( deprecated recursion uninitialized );
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use Carp;
 use Compress::Zlib ();
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Lite.pm 
new/PDF-API2-2.040/lib/PDF/API2/Lite.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Lite.pm     2021-03-04 18:11:07.000000000 
+0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Lite.pm     2021-04-13 17:19:19.000000000 
+0200
@@ -3,7 +3,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 BEGIN {
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Matrix.pm 
new/PDF-API2-2.040/lib/PDF/API2/Matrix.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Matrix.pm   2021-03-04 18:11:07.000000000 
+0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Matrix.pm   2021-04-13 17:19:19.000000000 
+0200
@@ -4,7 +4,7 @@
 
 use Carp;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub new {
     my $type = shift();
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/NamedDestination.pm 
new/PDF-API2-2.040/lib/PDF/API2/NamedDestination.pm
--- old/PDF-API2-2.039/lib/PDF/API2/NamedDestination.pm 2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/NamedDestination.pm 2021-04-13 
17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use Encode qw(:all);
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Outline.pm 
new/PDF-API2-2.040/lib/PDF/API2/Outline.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Outline.pm  2021-03-04 18:11:07.000000000 
+0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Outline.pm  2021-04-13 17:19:19.000000000 
+0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use Carp qw(croak);
 use PDF::API2::Basic::PDF::Utils;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Outlines.pm 
new/PDF-API2-2.040/lib/PDF/API2/Outlines.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Outlines.pm 2021-03-04 18:11:07.000000000 
+0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Outlines.pm 2021-04-13 17:19:19.000000000 
+0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Basic::PDF::Utils;
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Page.pm 
new/PDF-API2-2.040/lib/PDF/API2/Page.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Page.pm     2021-03-04 18:11:07.000000000 
+0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Page.pm     2021-04-13 17:19:19.000000000 
+0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use POSIX qw(floor);
 use Scalar::Util qw(weaken);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Resource/BaseFont.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/BaseFont.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/BaseFont.pm        2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/BaseFont.pm        2021-04-13 
17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use Compress::Zlib;
 use Encode qw(:all);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/CIDFont/CJKFont.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/CIDFont/CJKFont.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/CIDFont/CJKFont.pm 2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/CIDFont/CJKFont.pm 2021-04-13 
17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Util;
 use PDF::API2::Basic::PDF::Utils;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/CIDFont/TrueType/FontFile.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/CIDFont/TrueType/FontFile.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/CIDFont/TrueType/FontFile.pm       
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/CIDFont/TrueType/FontFile.pm       
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use Carp;
 use Encode qw(:all);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/CIDFont/TrueType.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/CIDFont/TrueType.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/CIDFont/TrueType.pm        
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/CIDFont/TrueType.pm        
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Basic::PDF::Utils;
 use PDF::API2::Resource::CIDFont::TrueType::FontFile;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Resource/CIDFont.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/CIDFont.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/CIDFont.pm 2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/CIDFont.pm 2021-04-13 
17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use Encode qw(:all);
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/ColorSpace/DeviceN.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/ColorSpace/DeviceN.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/ColorSpace/DeviceN.pm      
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/ColorSpace/DeviceN.pm      
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Basic::PDF::Utils;
 use PDF::API2::Util;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/ColorSpace/Indexed/ACTFile.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/ColorSpace/Indexed/ACTFile.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/ColorSpace/Indexed/ACTFile.pm      
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/ColorSpace/Indexed/ACTFile.pm      
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Basic::PDF::Utils;
 use PDF::API2::Util;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/ColorSpace/Indexed/Hue.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/ColorSpace/Indexed/Hue.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/ColorSpace/Indexed/Hue.pm  
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/ColorSpace/Indexed/Hue.pm  
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Basic::PDF::Utils;
 use PDF::API2::Util;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/ColorSpace/Indexed/WebColor.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/ColorSpace/Indexed/WebColor.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/ColorSpace/Indexed/WebColor.pm     
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/ColorSpace/Indexed/WebColor.pm     
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Basic::PDF::Utils;
 use PDF::API2::Util;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/ColorSpace/Indexed.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/ColorSpace/Indexed.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/ColorSpace/Indexed.pm      
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/ColorSpace/Indexed.pm      
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Basic::PDF::Utils;
 use PDF::API2::Util;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/ColorSpace/Separation.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/ColorSpace/Separation.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/ColorSpace/Separation.pm   
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/ColorSpace/Separation.pm   
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Basic::PDF::Utils;
 use PDF::API2::Util;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Resource/ColorSpace.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/ColorSpace.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/ColorSpace.pm      2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/ColorSpace.pm      2021-04-13 
17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Basic::PDF::Utils;
 use PDF::API2::Util;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Resource/Colors.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Colors.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Colors.pm  2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Colors.pm  2021-04-13 
17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub get_colors {
     return (
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Resource/ExtGState.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/ExtGState.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/ExtGState.pm       2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/ExtGState.pm       2021-04-13 
17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Basic::PDF::Utils;
 use PDF::API2::Util;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/BdFont.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/BdFont.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/BdFont.pm     2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/BdFont.pm     2021-04-13 
17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Util;
 use PDF::API2::Basic::PDF::Utils;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/bankgothic.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/bankgothic.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/bankgothic.pm        
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/bankgothic.pm        
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'BankGothicMediumBT',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/courier.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/courier.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/courier.pm   
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/courier.pm   
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Courier',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/courierbold.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/courierbold.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/courierbold.pm       
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/courierbold.pm       
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Courier-Bold',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/courierboldoblique.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/courierboldoblique.pm
--- 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/courierboldoblique.pm    
    2021-03-04 18:11:07.000000000 +0100
+++ 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/courierboldoblique.pm    
    2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Courier-BoldOblique',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/courieroblique.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/courieroblique.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/courieroblique.pm    
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/courieroblique.pm    
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Courier-Oblique',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/georgia.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/georgia.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/georgia.pm   
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/georgia.pm   
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Georgia',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/georgiabold.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/georgiabold.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/georgiabold.pm       
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/georgiabold.pm       
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Georgia,Bold',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/georgiabolditalic.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/georgiabolditalic.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/georgiabolditalic.pm 
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/georgiabolditalic.pm 
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Georgia,BoldItalic',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/georgiaitalic.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/georgiaitalic.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/georgiaitalic.pm     
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/georgiaitalic.pm     
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Georgia,Italic',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/helvetica.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/helvetica.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/helvetica.pm 
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/helvetica.pm 
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Helvetica',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/helveticabold.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/helveticabold.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/helveticabold.pm     
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/helveticabold.pm     
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Helvetica-Bold',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/helveticaboldoblique.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/helveticaboldoblique.pm
--- 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/helveticaboldoblique.pm  
    2021-03-04 18:11:07.000000000 +0100
+++ 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/helveticaboldoblique.pm  
    2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Helvetica-BoldOblique',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/helveticaoblique.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/helveticaoblique.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/helveticaoblique.pm  
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/helveticaoblique.pm  
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Helvetica-Oblique',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/symbol.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/symbol.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/symbol.pm    
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/symbol.pm    
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Symbol',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/timesbold.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/timesbold.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/timesbold.pm 
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/timesbold.pm 
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Times-Bold',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/timesbolditalic.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/timesbolditalic.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/timesbolditalic.pm   
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/timesbolditalic.pm   
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Times-BoldItalic',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/timesitalic.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/timesitalic.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/timesitalic.pm       
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/timesitalic.pm       
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Times-Italic',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/timesroman.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/timesroman.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/timesroman.pm        
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/timesroman.pm        
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Times-Roman',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/trebuchet.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/trebuchet.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/trebuchet.pm 
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/trebuchet.pm 
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'TrebuchetMS',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/trebuchetbold.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/trebuchetbold.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/trebuchetbold.pm     
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/trebuchetbold.pm     
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'TrebuchetMS,Bold',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/trebuchetbolditalic.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/trebuchetbolditalic.pm
--- 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/trebuchetbolditalic.pm   
    2021-03-04 18:11:07.000000000 +0100
+++ 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/trebuchetbolditalic.pm   
    2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'TrebuchetMS,BoldItalic',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/trebuchetitalic.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/trebuchetitalic.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/trebuchetitalic.pm   
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/trebuchetitalic.pm   
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'TrebuchetMS,Italic',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/verdana.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/verdana.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/verdana.pm   
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/verdana.pm   
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Verdana',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/verdanabold.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/verdanabold.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/verdanabold.pm       
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/verdanabold.pm       
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Verdana,Bold',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/verdanabolditalic.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/verdanabolditalic.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/verdanabolditalic.pm 
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/verdanabolditalic.pm 
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Verdana,BoldItalic',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/verdanaitalic.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/verdanaitalic.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/verdanaitalic.pm     
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/verdanaitalic.pm     
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Verdana,Italic',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/webdings.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/webdings.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/webdings.pm  
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/webdings.pm  
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Webdings',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/wingdings.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/wingdings.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/wingdings.pm 
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/wingdings.pm 
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'Wingdings',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/zapfdingbats.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/zapfdingbats.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont/zapfdingbats.pm      
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont/zapfdingbats.pm      
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub data { return {
     'fontname' => 'ZapfDingbats',
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/CoreFont.pm   2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/CoreFont.pm   2021-04-13 
17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use File::Basename;
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/Postscript.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/Postscript.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/Postscript.pm 2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/Postscript.pm 2021-04-13 
17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use Encode qw(:all);
 use IO::File qw();
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/SynFont.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/SynFont.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font/SynFont.pm    2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font/SynFont.pm    2021-04-13 
17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use Math::Trig;
 use Unicode::UCD 'charinfo';
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Resource/Font.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Font.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Font.pm    2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Font.pm    2021-04-13 
17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use Encode qw(:all);
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Resource/Glyphs.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Glyphs.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Glyphs.pm  2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Glyphs.pm  2021-04-13 
17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 # The data in this file is generated from uniglyph.txt.  In earlier
 # versions of PDF::API2, this file was parsed and sorted every time
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Resource/PaperSizes.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/PaperSizes.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/PaperSizes.pm      2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/PaperSizes.pm      2021-04-13 
17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub get_paper_sizes {
     return (
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Resource/Pattern.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Pattern.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Pattern.pm 2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Pattern.pm 2021-04-13 
17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub new {
     my ($class, $pdf, $name) = @_;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Resource/Shading.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/Shading.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/Shading.pm 2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/Shading.pm 2021-04-13 
17:19:19.000000000 +0200
@@ -5,6 +5,6 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 1;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Resource/UniFont.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/UniFont.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/UniFont.pm 2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/UniFont.pm 2021-04-13 
17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use Carp;
 use Encode qw(:all);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Form/BarCode/codabar.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Form/BarCode/codabar.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Form/BarCode/codabar.pm    
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Form/BarCode/codabar.pm    
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub new {
     my ($class, $pdf, %options) = @_;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Form/BarCode/code128.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Form/BarCode/code128.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Form/BarCode/code128.pm    
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Form/BarCode/code128.pm    
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 =head1 NAME
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Form/BarCode/code3of9.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Form/BarCode/code3of9.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Form/BarCode/code3of9.pm   
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Form/BarCode/code3of9.pm   
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub new {
     my ($class, $pdf, %options) = @_;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Form/BarCode/ean13.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Form/BarCode/ean13.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Form/BarCode/ean13.pm      
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Form/BarCode/ean13.pm      
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 sub new {
     my ($class, $pdf, %options) = @_;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Form/BarCode/int2of5.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Form/BarCode/int2of5.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Form/BarCode/int2of5.pm    
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Form/BarCode/int2of5.pm    
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 # Interleaved 2 of 5 Barcodes
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Form/BarCode.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Form/BarCode.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Form/BarCode.pm    
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Form/BarCode.pm    
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Util;
 use PDF::API2::Basic::PDF::Utils;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Form/Hybrid.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Form/Hybrid.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Form/Hybrid.pm     
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Form/Hybrid.pm     
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Basic::PDF::Dict;
 use PDF::API2::Basic::PDF::Utils;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Form.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Form.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Form.pm    2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Form.pm    2021-04-13 
17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Basic::PDF::Utils;
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Image/GD.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Image/GD.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Image/GD.pm        
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Image/GD.pm        
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Util;
 use PDF::API2::Basic::PDF::Utils;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Image/GIF.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Image/GIF.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Image/GIF.pm       
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Image/GIF.pm       
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use IO::File;
 use PDF::API2::Util;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Image/JPEG.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Image/JPEG.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Image/JPEG.pm      
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Image/JPEG.pm      
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use IO::File;
 use PDF::API2::Util;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Image/PNG.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Image/PNG.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Image/PNG.pm       
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Image/PNG.pm       
2021-04-13 17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use Compress::Zlib;
 use POSIX qw(ceil floor);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Image/PNM.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Image/PNM.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Image/PNM.pm       
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Image/PNM.pm       
2021-04-13 17:19:19.000000000 +0200
@@ -9,7 +9,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use IO::File;
 use PDF::API2::Util;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Image/TIFF/File.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Image/TIFF/File.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Image/TIFF/File.pm 
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Image/TIFF/File.pm 
2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use IO::File;
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Image/TIFF.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Image/TIFF.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Image/TIFF.pm      
2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Image/TIFF.pm      
2021-04-13 17:19:19.000000000 +0200
@@ -7,7 +7,7 @@
 
 no warnings 'uninitialized';
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use Compress::Zlib;
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Image.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Image.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject/Image.pm   2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject/Image.pm   2021-04-13 
17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Basic::PDF::Utils;
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource/XObject.pm 2021-03-04 
18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource/XObject.pm 2021-04-13 
17:19:19.000000000 +0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Basic::PDF::Utils;
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Resource.pm 
new/PDF-API2-2.040/lib/PDF/API2/Resource.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Resource.pm 2021-03-04 18:11:07.000000000 
+0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Resource.pm 2021-04-13 17:19:19.000000000 
+0200
@@ -5,7 +5,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use PDF::API2::Util qw(pdfkey);
 use PDF::API2::Basic::PDF::Utils; # PDFName
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/UniWrap.pm 
new/PDF-API2-2.040/lib/PDF/API2/UniWrap.pm
--- old/PDF-API2-2.039/lib/PDF/API2/UniWrap.pm  2021-03-04 18:11:07.000000000 
+0100
+++ new/PDF-API2-2.040/lib/PDF/API2/UniWrap.pm  2021-04-13 17:19:19.000000000 
+0200
@@ -3,7 +3,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 # Implements UAX#14: Line Breaking Properties
 # David Nesting <da...@fastolfe.net>
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Util.pm 
new/PDF-API2-2.040/lib/PDF/API2/Util.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Util.pm     2021-03-04 18:11:07.000000000 
+0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Util.pm     2021-04-13 17:19:19.000000000 
+0200
@@ -3,7 +3,7 @@
 use strict;
 no warnings qw[ recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 BEGIN {
     use Encode qw(:all);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2/Win32.pm 
new/PDF-API2-2.040/lib/PDF/API2/Win32.pm
--- old/PDF-API2-2.039/lib/PDF/API2/Win32.pm    2021-03-04 18:11:07.000000000 
+0100
+++ new/PDF-API2-2.040/lib/PDF/API2/Win32.pm    2021-04-13 17:19:19.000000000 
+0200
@@ -3,7 +3,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 package PDF::API2;
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/lib/PDF/API2.pm 
new/PDF-API2-2.040/lib/PDF/API2.pm
--- old/PDF-API2-2.039/lib/PDF/API2.pm  2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/lib/PDF/API2.pm  2021-04-13 17:19:19.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 no warnings qw[ deprecated recursion uninitialized ];
 
-our $VERSION = '2.039'; # VERSION
+our $VERSION = '2.040'; # VERSION
 
 use Carp;
 use Encode qw(:all);
@@ -185,6 +185,7 @@
     $self->{'catalog'} = $self->{'pdf'}->{'Root'};
     weaken $self->{'catalog'};
 
+    $self->{'opened'} = 1;
     if (exists $options{'-compress'}) {
         $self->{'forcecompress'} = $options{'-compress'} ? 1 : 0;
     }
@@ -994,6 +995,9 @@
         unless ($self->{'pdf'}->{' fname'}) {
             $self->{'pdf'}->out_file($file);
         }
+        elsif ($self->{'pdf'}->{' fname'} eq $file) {
+            $self->update();
+        }
         else {
             $self->{'pdf'}->clone_file($file);
             $self->{'pdf'}->close_file();
@@ -1051,6 +1055,13 @@
         $self->{'pdf'}->append_file();
         $str = ${$self->{'content_ref'}};
     }
+    elsif ($self->{'opened'}) {
+        my $fh = FileHandle->new();
+        CORE::open($fh, '>', \$str) || die "Can't begin scalar IO";
+        $self->{'pdf'}->clone_file($fh);
+        $self->{'pdf'}->close_file();
+        $fh->close();
+    }
     else {
         my $fh = FileHandle->new();
         CORE::open($fh, '>', \$str) || die "Can't begin scalar IO";
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/t/pdf.t new/PDF-API2-2.040/t/pdf.t
--- old/PDF-API2-2.039/t/pdf.t  2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/t/pdf.t  2021-04-13 17:19:19.000000000 +0200
@@ -1,8 +1,9 @@
-use Test::More tests => 12;
+use Test::More tests => 16;
 
 use warnings;
 use strict;
 
+use File::Temp qw(tempfile);
 use PDF::API2;
 
 my $pdf = PDF::API2->new();
@@ -14,7 +15,7 @@
 my $gfx = $pdf->page->gfx();
 $gfx->fillcolor('blue');
 
-my $new = PDF::API2->open_scalar($pdf->stringify(), );
+my $new = PDF::API2->open_scalar($pdf->stringify());
 %info = $new->info();
 is($info{'Producer'}, 'PDF::API2 Test Suite', 'Check info string after save 
and reload');
 
@@ -90,3 +91,49 @@
 like($pdf->stringify(), qr{/PageLabels << /Nums \[ 0 << /P \(Test\) /S /D >> 
\] >>},
      q{Page Numbering: Decimal Characters (implicit), with prefix});
 
+
+##
+## stringify
+##
+
+$pdf = PDF::API2->new(-compress => 0);
+$gfx = $pdf->page->gfx();
+$gfx->fillcolor('blue');
+
+$string = $pdf->stringify();
+like($string, qr/0 0 1 rg/,
+     q{Stringify of newly-created PDF contains expected content});
+
+my ($fh, $filename) = tempfile();
+print $fh $string;
+close $fh;
+
+$pdf = PDF::API2->open($filename);
+$string = $pdf->stringify();
+like($string, qr/0 0 1 rg/,
+     q{Stringify of newly-opened PDF contains expected content});
+
+##
+## saveas with same filename
+##
+
+$pdf = PDF::API2->new(-compress => 0);
+$gfx = $pdf->page->gfx();
+$gfx->fillcolor('blue');
+
+($fh, $filename) = tempfile();
+print $fh $pdf->stringify();
+close $fh;
+
+$pdf = PDF::API2->open($filename, -compress => 0);
+$gfx = $pdf->page->gfx();
+$gfx->fillcolor('red');
+$pdf->saveas($filename);
+
+$pdf = PDF::API2->open($filename, -compress => 0);
+$string = $pdf->stringify();
+like($string, qr/0 0 1 rg/,
+     q{saveas($opened_filename) contains original content});
+like($string, qr/1 0 0 rg/,
+     q{saveas($opened_filename) contains new content});
+
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/PDF-API2-2.039/t/string.t 
new/PDF-API2-2.040/t/string.t
--- old/PDF-API2-2.039/t/string.t       2021-03-04 18:11:07.000000000 +0100
+++ new/PDF-API2-2.040/t/string.t       2021-04-13 17:19:19.000000000 +0200
@@ -1,4 +1,4 @@
-use Test::More tests => 41;
+use Test::More tests => 42;
 
 use strict;
 use warnings;
@@ -209,3 +209,10 @@
 is($string->as_pdf(),
    '<0000005C00000000>',
    q{[RT #63918] Incorrect handling of literal backslashes 2/2});
+
+
+# RT 134957
+$string = PDFStr("\x00\n\x00");
+is($string->as_pdf(),
+   '<000A00>',
+   q{\n in a string containing non-printable characters is hex-encoded});

Reply via email to