[153579] trunk/dports/sysutils/skey

[larryv at macports.org]

Revision: 153579
          https://trac.macports.org/changeset/153579
Author:   larryv at macports.org
Date:     2016-10-04 15:38:40 -0700 (Tue, 04 Oct 2016)
Log Message:
-----------
skey: Fix build error with Perl 5.22

Closes #52358.

Modified Paths:
--------------
    trunk/dports/sysutils/skey/Portfile

Added Paths:
-----------
    trunk/dports/sysutils/skey/files/patch-no-defined.diff

Modified: trunk/dports/sysutils/skey/Portfile
===================================================================
--- trunk/dports/sysutils/skey/Portfile	2016-10-04 22:38:37 UTC (rev 153578)
+++ trunk/dports/sysutils/skey/Portfile	2016-10-04 22:38:40 UTC (rev 153579)
@@ -20,6 +20,7 @@
                     sha1    d55fb286098900cdf3eb6b174a720a06c722312a \
                     rmd160  33d97cbcd6dbc91bdca5b27056d51d1f5d06b68d
 
-patchfiles          patch-fix-manpage-name.diff
+patchfiles          patch-no-defined.diff \
+                    patch-fix-manpage-name.diff
 
 configure.args      --mandir=${prefix}/share/man

Added: trunk/dports/sysutils/skey/files/patch-no-defined.diff
===================================================================
--- trunk/dports/sysutils/skey/files/patch-no-defined.diff	                        (rev 0)
+++ trunk/dports/sysutils/skey/files/patch-no-defined.diff	2016-10-04 22:38:40 UTC (rev 153579)
@@ -0,0 +1,28 @@
+https://trac.macports.org/ticket/52358
+
+It is an error to use "defined" with Perl 5.22 and later.
+
+Upstream-Status: Inappropriate [no upstream]
+
+Index: fixpaths
+===================================================================
+--- fixpaths.orig
++++ fixpaths
+@@ -7,7 +7,7 @@ $usage = "Usage: $0 [-x<file dot-suffix>
+ 
+ $ext="out";
+ 
+-if (!defined(@ARGV)) { die ("$usage"); }
++if (!@ARGV) { die ("$usage"); }
+ 
+ # read in the command line and get some definitions
+ while ($_=$ARGV[0], /^-/) {
+@@ -26,7 +26,7 @@ while ($_=$ARGV[0], /^-/) {
+   }
+ } # while parsing arguments
+ 
+-if (!defined(%def)) {
++if (!%def) {
+   die ("$0: nothing to do - no substitutions listed!\n");
+ }
+ 
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macports.org/pipermail/macports-changes/attachments/20161004/ff25f037/attachment-0002.html>