| Subject: | Warning: "my" variable $comment masks earlier declaration in same scope at /usr/lib/perl5/site_perl/5.8.0/Email/Address.pm line 167. |
Just a minor thing...
See patch attached to kill a warning.
--- Address.pm.old 2004-10-09 13:34:36.000000000 +1000
+++ Address.pm 2004-10-09 13:34:22.000000000 +1000
@@ -164,8 +164,7 @@
s/\s+$//;
}
- my $comment = join ' ', @comments;
- push @addrs, $class->new($phrase, "$user\@$host", $comment, $original);
+ push @addrs, $class->new($phrase, "$user\@$host", join(' ', @comments), $original);
}
$PARSE_CACHE{$line} = [@addrs];
@addrs;