r15866 - /scripts/qa/DebianQA/Archive.pm
tincho-guest at users.alioth.debian.org
tincho-guest at users.alioth.debian.org
Thu Feb 28 13:01:22 UTC 2008
Author: tincho-guest
Date: Thu Feb 28 13:01:21 2008
New Revision: 15866
URL: http://svn.debian.org/wsvn/?sc=1&rev=15866
Log:
log when cache is uptodate
Modified:
scripts/qa/DebianQA/Archive.pm
Modified: scripts/qa/DebianQA/Archive.pm
URL: http://svn.debian.org/wsvn/scripts/qa/DebianQA/Archive.pm?rev=15866&op=diff
==============================================================================
--- scripts/qa/DebianQA/Archive.pm (original)
+++ scripts/qa/DebianQA/Archive.pm Thu Feb 28 13:01:21 2008
@@ -81,7 +81,10 @@
}
$modified ||= (find_stamp(read_cache("consolidated", "", 0), "pkglist") >
find_stamp(read_cache("consolidated", "", 0), "archive"));
- return unless($modified);
+ unless($modified) {
+ info("Archive consolidated cache is up-to-date");
+ return;
+ }
info("Re-generating archive consolidated hash");
my $pkgs = get_pkglist_hashref();
# retain lock, we need consistency
More information about the Pkg-perl-cvs-commits
mailing list