X-Git-Url: https://git.deb.at/?p=deb%2Fpackages.git;a=blobdiff_plain;f=lib%2FPackages%2FDoFilelist.pm;h=a1dda56b95d01904096438c2b448ed828b39a37c;hp=7fb1a8fd5456f7ca330db521a9a77881846456bc;hb=06c6f30bfc4f55cecc7485fef0f0a227e32b44f0;hpb=56d4b3ed57e20359e5ea46feabb850cf4a94caf2

diff --git a/lib/Packages/DoFilelist.pm b/lib/Packages/DoFilelist.pm
index 7fb1a8f..a1dda56 100644
--- a/lib/Packages/DoFilelist.pm
+++ b/lib/Packages/DoFilelist.pm
@@ -28,13 +28,13 @@ sub do_filelist {
     my ($params, $opts, $html_header, $menu, $page_content) = @_;
 
     if ($params->{errors}{package}) {
-	fatal_error( _( "package not valid or not specified" ) );
+	fatal_error( _g( "package not valid or not specified" ) );
     }
     if ($params->{errors}{suite}) {
-	fatal_error( _( "suite not valid or not specified" ) );
+	fatal_error( _g( "suite not valid or not specified" ) );
     }
     if ($params->{errors}{arch}) {
-	fatal_error( _( "architecture not valid or not specified" ) );
+	fatal_error( _g( "architecture not valid or not specified" ) );
     }
 
     $$menu = '';
@@ -42,8 +42,8 @@ sub do_filelist {
     my $suite = $opts->{suite}[0];
     my $arch = $opts->{arch}[0] ||'';
 
-    %$html_header = ( title => sprintf( _( "Filelist of package <em>%s</em> in <em>%s</em> of architecture <em>%s</em>" ), $pkg, $suite, $arch ),
-		      title_tag => sprintf( _( "Filelist of of package %s/%s/%s" ), $pkg, $suite, $arch ),
+    %$html_header = ( title => sprintf( _g( "Filelist of package <em>%s</em> in <em>%s</em> of architecture <em>%s</em>" ), $pkg, $suite, $arch ),
+		      title_tag => sprintf( _g( "Filelist of package %s/%s/%s" ), $pkg, $suite, $arch ),
 		      lang => $opts->{lang},
 		      keywords => "debian, $suite, $arch, filelist",
 		      print_title => 1,
@@ -54,19 +54,19 @@ sub do_filelist {
 	    O_RDONLY, 0666, $DB_BTREE) {
 
 	    unless (exists $contents{$pkg}) {
-		fatal_error( _( "No such package in this suite on this architecture." ) );
+		fatal_error( _g( "No such package in this suite on this architecture." ) );
 	    } else {
 		my @files = unpack "L/(CC/a)", $contents{$pkg};
 		my $file = "";
 		$$page_content .= '<div id="pfilelist"><pre>';
 		for (my $i=0; $i<scalar @files;) {
 		    $file = substr($file, 0, $files[$i++]).$files[$i++];
-		    $$page_content .= "$file\n";
+		    $$page_content .= "/$file\n";
 		}
 		$$page_content .= '</pre></div>';
 	    }
 	} else {
-	    fatal_error( _( "Invalid suite/architecture combination" ) );
+	    fatal_error( _g( "Invalid suite/architecture combination" ) );
 	}
     }
 }