[med-svn] [libace-perl] 04/05: Add patch defined_hash_array.patch

[gregor herrmann]

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

gregoa pushed a commit to branch master
in repository libace-perl.

commit 361f19dc7790b2a99d9c2c0e75945c2dd270afc3
Author: gregor herrmann <gregoa at debian.org>
Date:   Fri Nov 24 17:52:53 2017 +0100

    Add patch defined_hash_array.patch
    
    to remove the deprecated 'defined(%hash)' and 'defined(@arry)' usage which
    causes warnings.
    
    Thanks: autopkgtest's syntax.t.
---
 debian/patches/defined_hash_array.patch | 18 ++++++++++++++++++
 debian/patches/series                   |  1 +
 2 files changed, 19 insertions(+)

diff --git a/debian/patches/defined_hash_array.patch b/debian/patches/defined_hash_array.patch
new file mode 100644
index 0000000..681c400
--- /dev/null
+++ b/debian/patches/defined_hash_array.patch
@@ -0,0 +1,18 @@
+Description: fix "Can't use 'defined(%hash)'" and "Can't use 'defined(@array)'" warnings
+Origin: vendor
+Author: gregor herrmann <gregoa at debian.org>
+Last-Update: 2017-11-24
+
+--- a/Ace/Browser/SiteDefs.pm
++++ b/Ace/Browser/SiteDefs.pm
+@@ -221,8 +221,8 @@
+   foreach (keys %{"${namespace}::"}) {
+     *symbol = ${"${namespace}::"}{$_};
+     $data{ucfirst(lc $_)} = $symbol if defined($symbol);
+-    $data{ucfirst(lc $_)} = \%symbol if defined(%symbol);
+-    $data{ucfirst(lc $_)} = \@symbol if defined(@symbol);
++    $data{ucfirst(lc $_)} = \%symbol if %symbol;
++    $data{ucfirst(lc $_)} = \@symbol if @symbol;
+     $data{ucfirst(lc $_)} = \&symbol if defined(&symbol);
+     undef *symbol unless defined &symbol;  # conserve  some memory
+   }
diff --git a/debian/patches/series b/debian/patches/series
index d51a9ab..0e3e8b3 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1,2 +1,3 @@
 spelling.patch
 parallel-ftbfs.patch
+defined_hash_array.patch

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/debian-med/libace-perl.git