[libpdf-api2-perl] 01/03: Add a patch by futuramedium fixing an issue in ->outlines()

[Damyan Ivanov]

This is an automated email from the git hooks/post-receive script.

dmn pushed a commit to branch master
in repository libpdf-api2-perl.

commit 36d3475a0069e58146813784eef196f1ec0ae449
Author: Damyan Ivanov <dmn at debian.org>
Date:   Thu Oct 5 07:53:38 2017 +0000

    Add a patch by futuramedium fixing an issue in ->outlines()
    
    Thanks to Phil M Perry for the headsup.
    
    Closes: #509706
---
 debian/patches/outlines.patch | 19 +++++++++++++++++++
 debian/patches/series         |  1 +
 2 files changed, 20 insertions(+)

diff --git a/debian/patches/outlines.patch b/debian/patches/outlines.patch
new file mode 100644
index 0000000..90d4b4c
--- /dev/null
+++ b/debian/patches/outlines.patch
@@ -0,0 +1,19 @@
+Description: outlines() returns wrong object when outlines exist
+ The object needs to be blessed into PDF::API2::Outlines
+Author: futuramedium at yandex.ru
+Acked-By: Damyan Ivanov <dmn at debian.org>
+Bug: https://rt.cpan.org/Public/Bug/Display.html?id=121912
+Bug-Debian: https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=509706
+
+--- a/lib/PDF/API2.pm
++++ b/lib/PDF/API2.pm
+@@ -2278,6 +2278,9 @@ sub outlines {
+     $self->{pdf}->{Root}->{Outlines} ||= PDF::API2::Outlines->new($self);
+ 
+     my $obj = $self->{pdf}->{Root}->{Outlines};
++    bless $obj, 'PDF::API2::Outlines';
++    $obj->{' apipdf'} = $self->{pdf};
++    $obj->{' api'}    = $self;
+ 
+     $self->{pdf}->new_obj($obj) unless $obj->is_obj($self->{pdf});
+     $self->{pdf}->out_obj($obj);
diff --git a/debian/patches/series b/debian/patches/series
index 2952243..802094f 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1 +1,2 @@
 reproducible-resources.patch
+outlines.patch

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libpdf-api2-perl.git