[med-svn] r22526 - in trunk/packages/libgo-perl/trunk/debian: . patches

[Tatiana Malygina]

Author: latticetower-guest
Date: 2016-07-14 05:19:44 +0000 (Thu, 14 Jul 2016)
New Revision: 22526

Added:
   trunk/packages/libgo-perl/trunk/debian/patches/fix_hash_in_go_io_dotty.patch
Modified:
   trunk/packages/libgo-perl/trunk/debian/changelog
   trunk/packages/libgo-perl/trunk/debian/patches/series
Log:
fixed error, which appears when GO::IO::Dotty module is attempted to be used in perl

Modified: trunk/packages/libgo-perl/trunk/debian/changelog
===================================================================
--- trunk/packages/libgo-perl/trunk/debian/changelog	2016-07-14 05:04:13 UTC (rev 22525)
+++ trunk/packages/libgo-perl/trunk/debian/changelog	2016-07-14 05:19:44 UTC (rev 22526)
@@ -7,6 +7,11 @@
   * update debian/README.test, add debian/docs
   * add debian/tests/pkg-perl/syntax-skip to avoid skipping of *.pm files 
     in syntax.t (https://pkg-perl.alioth.debian.org/autopkgtest.html#syntax_t)
+  * fixed error, which appears when module GO::IO::Dotty is attempted to be used:
+    "Can't use a hash as a reference at /usr/share/perl5/GO/IO/Dotty.pm 
+    line 104" (can be reproduced by sh command 
+    "/usr/bin/perl -wc /usr/share/perl5/GO/IO/Dotty.pm" or 
+    "use GO::IO::Dotty;" line in perl script).
 
  -- Tatiana Malygina <merlettaia at gmail.com>  Wed, 13 Jul 2016 21:58:12 +0300
 

Added: trunk/packages/libgo-perl/trunk/debian/patches/fix_hash_in_go_io_dotty.patch
===================================================================
--- trunk/packages/libgo-perl/trunk/debian/patches/fix_hash_in_go_io_dotty.patch	                        (rev 0)
+++ trunk/packages/libgo-perl/trunk/debian/patches/fix_hash_in_go_io_dotty.patch	2016-07-14 05:19:44 UTC (rev 22526)
@@ -0,0 +1,17 @@
+Author: Tatiana Malygina <merlettaia at gmail.com>
+Last-Update: 2016-07-14
+Description: fixes error, which appears when module GO::IO::Dotty is attempted to
+ be used: 
+ "Can't use a hash as a reference at /usr/share/perl5/GO/IO/Dotty.pm line 104"
+
+--- a/GO/IO/Dotty.pm
++++ b/GO/IO/Dotty.pm
+@@ -101,7 +101,7 @@
+           $graphviz->add_node
+             ( $node, 
+               label=>$term->name . " " . $term->acc ,
+-              URL=>%opts->{'base_url'}.$term->acc,
++              URL=>%opts{'base_url'}.$term->acc,
+               fontname=>'Courier'
+             );
+       }

Modified: trunk/packages/libgo-perl/trunk/debian/patches/series
===================================================================
--- trunk/packages/libgo-perl/trunk/debian/patches/series	2016-07-14 05:04:13 UTC (rev 22525)
+++ trunk/packages/libgo-perl/trunk/debian/patches/series	2016-07-14 05:19:44 UTC (rev 22526)
@@ -2,3 +2,4 @@
 fix-missing-manpages
 fix-pod.patch
 fix_test_xsltproc
+fix_hash_in_go_io_dotty.patch