[Pgp-tools-commit] r700 - in trunk: caff gpglist gpgsigs

[Guilhem Moulin]

Author: guilhem-guest
Date: 2014-09-04 20:20:26 +0000 (Thu, 04 Sep 2014)
New Revision: 700

Modified:
   trunk/caff/caff
   trunk/caff/pgp-clean
   trunk/caff/pgp-fixkey
   trunk/gpglist/gpglist
   trunk/gpgsigs/gpgsigs
Log:
Avoid $& aka $English::MATCH.

Modified: trunk/caff/caff
===================================================================
--- trunk/caff/caff	2014-09-02 23:32:42 UTC (rev 699)
+++ trunk/caff/caff	2014-09-04 20:20:26 UTC (rev 700)
@@ -370,7 +370,7 @@
 
 use strict;
 use IO::Handle;
-use English;
+use English '-no_match_vars';
 use File::Copy qw{copy};
 use File::Path qw{make_path};
 use File::Temp;

Modified: trunk/caff/pgp-clean
===================================================================
--- trunk/caff/pgp-clean	2014-09-02 23:32:42 UTC (rev 699)
+++ trunk/caff/pgp-clean	2014-09-04 20:20:26 UTC (rev 700)
@@ -87,7 +87,7 @@
 
 use strict;
 use IO::Handle;
-use English;
+use English '-no_match_vars';
 use File::Path;
 use File::Temp qw{tempdir};
 use Fcntl;

Modified: trunk/caff/pgp-fixkey
===================================================================
--- trunk/caff/pgp-fixkey	2014-09-02 23:32:42 UTC (rev 699)
+++ trunk/caff/pgp-fixkey	2014-09-04 20:20:26 UTC (rev 700)
@@ -79,7 +79,7 @@
 
 use strict;
 use IO::Handle;
-use English;
+use English '-no_match_vars';
 use File::Path;
 use Fcntl;
 use IO::Select;

Modified: trunk/gpglist/gpglist
===================================================================
--- trunk/gpglist/gpglist	2014-09-02 23:32:42 UTC (rev 699)
+++ trunk/gpglist/gpglist	2014-09-04 20:20:26 UTC (rev 700)
@@ -78,7 +78,7 @@
 
 use strict;
 use warnings;
-use English;
+use English '-no_match_vars';
 
 my $now = time;
 my $key=shift @ARGV;

Modified: trunk/gpgsigs/gpgsigs
===================================================================
--- trunk/gpgsigs/gpgsigs	2014-09-02 23:32:42 UTC (rev 699)
+++ trunk/gpgsigs/gpgsigs	2014-09-04 20:20:26 UTC (rev 700)
@@ -20,7 +20,7 @@
 use warnings;
 use Encode ();
 use I18N::Langinfo 'langinfo';
-use English;
+use English '-no_match_vars';
 use IPC::Open3;
 use Getopt::Long;
 use File::Temp;