r8985 - /scripts/qa/DebianQA/Watch.pm

tincho-guest at users.alioth.debian.org tincho-guest at users.alioth.debian.org
Wed Nov 7 18:27:26 UTC 2007


Author: tincho-guest
Date: Wed Nov  7 18:27:26 2007
New Revision: 8985

URL: http://svn.debian.org/wsvn/?sc=1&rev=8985
Log:
Incorrect watch error

Modified:
    scripts/qa/DebianQA/Watch.pm

Modified: scripts/qa/DebianQA/Watch.pm
URL: http://svn.debian.org/wsvn/scripts/qa/DebianQA/Watch.pm?rev=8985&op=diff
==============================================================================
--- scripts/qa/DebianQA/Watch.pm (original)
+++ scripts/qa/DebianQA/Watch.pm Wed Nov  7 18:27:26 2007
@@ -93,7 +93,7 @@
                 $watch{$md5}{watch_error} = "InvalidVersion" unless(
                     defined $diff);
             } else {
-                $watch{$md5}{watch_error} = "Unreleased";
+                $watch{$md5}{watch_error} ||= "Error";
             }
             push @wresult, [ $diff, @{$watch{$md5}}{
                 qw/watch_error upstream_version upstream_mangled/ } ];




More information about the Pkg-perl-cvs-commits mailing list