Date: Mon, 27 Apr 2015 19:31:23 +0000 (UTC) From: Johan van Selst <johans@FreeBSD.org> To: ports-committers@freebsd.org, svn-ports-all@freebsd.org, svn-ports-head@freebsd.org Subject: svn commit: r384866 - in head/security/signing-party: . files Message-ID: <201504271931.t3RJVN8v047889@svn.freebsd.org>
next in thread | raw e-mail | index | archive | help
Author: johans Date: Mon Apr 27 19:31:23 2015 New Revision: 384866 URL: https://svnweb.freebsd.org/changeset/ports/384866 Log: Avoid perl 5.20 specific construct Fixes caff with perl 5.18 Submitted by: Mike Burns Added: head/security/signing-party/files/ head/security/signing-party/files/patch-caff_caff (contents, props changed) Modified: head/security/signing-party/Makefile Modified: head/security/signing-party/Makefile ============================================================================== --- head/security/signing-party/Makefile Mon Apr 27 19:23:14 2015 (r384865) +++ head/security/signing-party/Makefile Mon Apr 27 19:31:23 2015 (r384866) @@ -3,6 +3,7 @@ PORTNAME= signing-party PORTVERSION= 2.0 +PORTREVISION= 1 CATEGORIES= security MASTER_SITES= ftp://ftp.stack.nl/pub/users/johans/signing-party/ \ ${MASTER_SITE_DEBIAN} Added: head/security/signing-party/files/patch-caff_caff ============================================================================== --- /dev/null 00:00:00 1970 (empty, because file is newly added) +++ head/security/signing-party/files/patch-caff_caff Mon Apr 27 19:31:23 2015 (r384866) @@ -0,0 +1,15 @@ +Avoid construct that only works in perl 5.20 + +--- caff/caff.orig 2015-04-27 21:19:22.000000000 +0200 ++++ caff/caff 2015-04-27 21:19:28.000000000 +0200 +@@ -714,7 +714,9 @@ sub readwrite_gpg($%) { + # ignore direct and dup handles + my @infhs = grep {defined $opts{$_} and !$handles->options($_)->{direct} and $handles->{$_} !~ /^[<>]&/} qw/stdin passphrase command/; + my @outfhs = grep {defined $handles->{$_} and !$handles->options($_)->{direct} and $handles->{$_} !~ /^[<>]&/} qw/stdout stderr status logger/; +- my %fh = reverse %$handles{@infhs, @outfhs}; ++ my %fh; ++ $fh{$_} = $handles->{$_} foreach (@infhs, @outfhs); ++ %fh = reverse %fh; + + my %offset = map {$_ => 0} @infhs; + my %output = map {$_ => ''} @outfhs;
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?201504271931.t3RJVN8v047889>