From 1890fd4669feebb1eb04778e2296fcc5b621213a Mon Sep 17 00:00:00 2001 From: dms Date: Tue, 6 Feb 2001 12:42:37 +0000 Subject: [PATCH] debugging added. git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@355 c11ca15a-4712-0410-83d8-924469b57eb5 --- src/Modules/Debian.pl | 12 +++--------- 1 file changed, 3 insertions(+), 9 deletions(-) diff --git a/src/Modules/Debian.pl b/src/Modules/Debian.pl index 1b9e6ed..39d7dea 100644 --- a/src/Modules/Debian.pl +++ b/src/Modules/Debian.pl @@ -20,20 +20,12 @@ my %dists = ( "testing" => "woody", # new since 20001219. "stable" => "potato", "incoming" => "incoming", -### the following don't work. too much effort to get 3 types of distros -### to work harmoniously :-) - "slink" => "archive-2.1", - "hamm" => "archive-2.0", - "rex" => "archive-1.?", - "bo" => "archive-1.?", ); my %urlcontents = ( "debian/Contents-##DIST-i386.gz" => "ftp://ftp.us.debian.org". "/debian/dists/##DIST/Contents-i386.gz", -### APPEARS TO BE FIXED? -# => strip control chars just to be safe. "debian/Contents-##DIST-i386-non-US.gz" => "ftp://non-us.debian.org". "/debian-non-US/dists/##DIST/non-US/Contents-i386.gz", @@ -948,7 +940,7 @@ sub searchPackage { } if ($error) { - &::ERROR("could not generate index!!!"); + &::ERROR("could not generate index ($file)!!!"); return; } @@ -1002,6 +994,7 @@ sub getDistro { } if (exists $dists{$dist}) { + &::DEBUG("gD: returning dists{$dist} ($dists{$dist})"); return $dists{$dist}; } else { if (!grep /^\Q$dist\E$/i, %dists) { @@ -1009,6 +1002,7 @@ sub getDistro { return; } + &::DEBUG("gD: returning $dist (no change or conversion)"); return $dist; } } -- 2.39.5