r8960 - /scripts/qa/versioncheck3.pl
gregoa-guest at users.alioth.debian.org
gregoa-guest at users.alioth.debian.org
Wed Nov 7 14:13:25 UTC 2007
Author: gregoa-guest
Date: Wed Nov 7 14:13:25 2007
New Revision: 8960
URL: http://svn.debian.org/wsvn/?sc=1&rev=8960
Log:
port changes from versioncheck.pl to versioncheck3.pl
Modified:
scripts/qa/versioncheck3.pl
Modified: scripts/qa/versioncheck3.pl
URL: http://svn.debian.org/wsvn/scripts/qa/versioncheck3.pl?rev=8960&op=diff
==============================================================================
--- scripts/qa/versioncheck3.pl (original)
+++ scripts/qa/versioncheck3.pl Wed Nov 7 14:13:25 2007
@@ -463,7 +463,7 @@
my $page_io = IO::Scalar->new(\$page);
while( <$page_io> )
{
- warn $_ if 0;
+ warn $_ if 1;
if( $dir =~ /^http/ )
{
@@ -496,7 +496,7 @@
@vers = sort { cmp_ver($a->[0],$b->[0]) } @vers;
- my $ver = $vers[-1];
+ my $ver = $vers[-1] || '';
my $url;
($ver, $url) = $ver ? @$ver : (undef, undef);
More information about the Pkg-perl-cvs-commits
mailing list