[perl-glib-object-introspection] Third attempt to adapt t/arrays.t to newer poppler



commit da5fdde30137be93d2a95fdf43e1baddb3f0b1c8
Author: Torsten Schönfeld <kaffeetisch gmx de>
Date:   Sun Dec 8 16:58:34 2019 +0100

    Third attempt to adapt t/arrays.t to newer poppler

 t/arrays.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)
---
diff --git a/t/arrays.t b/t/arrays.t
index a097fda..999c29e 100644
--- a/t/arrays.t
+++ b/t/arrays.t
@@ -202,7 +202,7 @@ trailer <</Root 1 0 R>>
 __PDF__
 
   my ($major, $minor, $micro) = split /\./, Poppler::get_version ();
-  my @args = ($major > 0 || $minor >= 78) ? ([split //, $pdf], undef) : ($pdf, length $pdf, undef);
+  my @args = ($major > 0 || $minor >= 78) ? ([map ord, split //, $pdf], undef) : ($pdf, length $pdf, undef);
   my $doc = Poppler::Document->new_from_data (@args);
   my $quads = [
     Glib::Boxed::new ('Poppler::Quadrilateral',


[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]