From 2e4f623791d76cc9da9a609caffb62d69461cfb8 Mon Sep 17 00:00:00 2001 From: Jeroen van Wolffelaar Date: Mon, 13 Feb 2006 23:18:31 +0000 Subject: [PATCH] Fix path to contents db --- cgi-bin/show_filelist.pl | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/cgi-bin/show_filelist.pl b/cgi-bin/show_filelist.pl index 1dab20e..ff7b697 100755 --- a/cgi-bin/show_filelist.pl +++ b/cgi-bin/show_filelist.pl @@ -96,11 +96,10 @@ print_debug(); print_notes(); unless (@Packages::CGI::fatal_errors) { - tie my %contents, 'DB_File', "$DBDIR/packages_contents_${suite}_${arch}.db", + tie my %contents, 'DB_File', "$DBDIR/contents/filelists_${suite}_${arch}.db", O_RDONLY, 0666, $DB_BTREE - or die "couldn't tie DB $DBDIR/packages_contents_${suite}_${arch}.db: $!"; + or die "Invalid suite/arch combination"; - my $cont = $contents{$pkg}; print "No such package in this suite on this arch" if not exists $contents{$pkg}; my @files = unpack "L/(CC/a)", $contents{$pkg}; my $file = ""; -- 2.39.2