r15906 - /scripts/qa/DebianQA/Cache.pm

tincho-guest at users.alioth.debian.org tincho-guest at users.alioth.debian.org
Thu Feb 28 19:34:49 UTC 2008


Author: tincho-guest
Date: Thu Feb 28 19:34:48 2008
New Revision: 15906

URL: http://svn.debian.org/wsvn/?sc=1&rev=15906
Log:
Downgrade again find_stamp notice. Also, only check /version when in the root of the cache

Modified:
    scripts/qa/DebianQA/Cache.pm

Modified: scripts/qa/DebianQA/Cache.pm
URL: http://svn.debian.org/wsvn/scripts/qa/DebianQA/Cache.pm?rev=15906&op=diff
==============================================================================
--- scripts/qa/DebianQA/Cache.pm (original)
+++ scripts/qa/DebianQA/Cache.pm Thu Feb 28 19:34:48 2008
@@ -211,8 +211,9 @@
     $path ||= "";
     debug("find_stamp($hash, $path) invoked");
     die "Invalid hashref" unless($hash and ref $hash and ref $hash eq "HASH");
-    if(! $hash->{"/version"} or $hash->{"/version"} < $VERSION) {
-        info("find_stamp: returning 0 as cache has old version");
+    if(not $path and (not $hash->{"/version"} or
+            $hash->{"/version"} < $VERSION)) {
+        debug("find_stamp: returning 0 as cache has old version");
         return 0;
     }
     my $ctsmp = 0;




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