From 64b4a379093f540f0de17590c978742b85211279 Mon Sep 17 00:00:00 2001 From: dms Date: Wed, 13 Sep 2000 14:02:53 +0000 Subject: [PATCH] hopefully last time it will be fixed git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@92 c11ca15a-4712-0410-83d8-924469b57eb5 --- src/Modules/Debian.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/Modules/Debian.pl b/src/Modules/Debian.pl index 9dfe2b8..5f8fe78 100644 --- a/src/Modules/Debian.pl +++ b/src/Modules/Debian.pl @@ -378,7 +378,7 @@ sub generateIncoming { my $idxfile = $pkgfile.".idx"; my $stale = 0; $stale++ if (&main::isStale($pkgfile.".gz", $interval)); - $stale++ if (&main::isStale($idxfile.".gz", $interval)); + $stale++ if (&main::isStale($idxfile, $interval)); &main::DEBUG("gI: stale => '$stale'."); return 0 unless ($stale); @@ -464,7 +464,7 @@ sub getPackageInfo { $pkg{'section'} = $1; } elsif (/^Size: (.*)$/) { $pkg{'size'} = $1; - } elsif (/^i.*size: (.*)$/) { + } elsif (/^Installed-Size: (.*)$/i) { $pkg{'installed'} = $1; } elsif (/^Description: (.*)$/) { $pkg{'desc'} = $1; @@ -705,7 +705,7 @@ sub infoStats { # Usage: &generateIndex(); sub generateIndex { my (@dists) = @_; - &main::DEBUG("Debian: generateIndex() called."); + &main::status("Debian: !!! generateIndex() called !!!"); if (!scalar @dists) { &main::ERROR("gI: no dists to generate index."); return 1; -- 2.39.2