From: Jeroen van Wolffelaar Date: Mon, 13 Feb 2006 23:18:31 +0000 (+0000) Subject: Fix path to contents db X-Git-Tag: switch-to-templates~137 X-Git-Url: https://git.deb.at/?p=deb%2Fpackages.git;a=commitdiff_plain;h=2e4f623791d76cc9da9a609caffb62d69461cfb8;ds=sidebyside Fix path to contents db --- 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 = "";