From 877967f06577ac4c987e16d2f1b6a90909b819e3 Mon Sep 17 00:00:00 2001 From: ajt <> Date: Fri, 23 Feb 2001 07:40:40 -0800 Subject: [PATCH] [project @ 2001-02-23 07:40:40 by ajt] minor bugfixes --- cgi/common.pl | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/cgi/common.pl b/cgi/common.pl index f212eede..ccf15aaa 100644 --- a/cgi/common.pl +++ b/cgi/common.pl @@ -303,7 +303,7 @@ sub getbugs { -e "$debbugs::gSpoolDir/by-$opt.idx") { my %lookup; -print STDERR "optimized" if ($debug); +print STDERR "optimized\n" if ($debug); tie %lookup, DB_File => "$debbugs::gSpoolDir/by-$opt.idx", O_RDONLY or die "$0: can't open $debbugs::gSpoolDir/by-$opt.idx ($!)\n"; while ($key = shift) { @@ -312,6 +312,8 @@ print STDERR "optimized" if ($debug); push @result, (unpack 'N*', $bugs); } } + untie %lookup; +print STDERR "done optimized\n" if ($debug); } else { if ( $common_archive ) { open I, "<$debbugs::gSpoolDir/index.archive" -- 2.39.5