[Rt-commit] r7601 - in rt/branches/3.7-EXPERIMENTAL: .

[ruz at bestpractical.com]

Author: ruz
Date: Sat Apr 21 11:43:27 2007
New Revision: 7601

Modified:
   rt/branches/3.7-EXPERIMENTAL/   (props changed)
   rt/branches/3.7-EXPERIMENTAL/lib/RT/Crypt/GnuPG.pm

Log:
 r5043 at cubic-pc:  cubic | 2007-04-21 17:32:30 +0400
 * avoid 'masks earlier declaration' warning


Modified: rt/branches/3.7-EXPERIMENTAL/lib/RT/Crypt/GnuPG.pm
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL/lib/RT/Crypt/GnuPG.pm	(original)
+++ rt/branches/3.7-EXPERIMENTAL/lib/RT/Crypt/GnuPG.pm	Sat Apr 21 11:43:27 2007
@@ -1094,7 +1094,8 @@
     my @res = ();
     foreach my $line( @lines ) {
         chomp $line;
-        my ($tag, $line) = split /:/, $line, 2;
+        my $tag;
+        ($tag, $line) = split /:/, $line, 2;
         if ( $tag eq 'pub' ) {
             my %info;
             @info{ qw(