Update all .po and .pot files

[deb/packages.git] / lib / Packages / DoFilelist.pm

diff --git a/lib/Packages/DoFilelist.pm b/lib/Packages/DoFilelist.pm
index 97e9f013bea2db584800accdc1c87bbfde3c41ca..585504250a2c3842f2478329aa27de3fc648d481 100644 (file)
--- a/lib/Packages/DoFilelist.pm
+++ b/lib/Packages/DoFilelist.pm
@@ -4,10 +4,7 @@ use strict;
 use warnings;
 
 use POSIX;
-use URI::Escape;
-use HTML::Entities;
 use DB_File;
-use Benchmark ':hireswallclock';
 use Exporter;
 
 use Deb::Versions;
@@ -24,7 +21,7 @@ our @ISA = qw( Exporter );
 our @EXPORT = qw( do_filelist );
 
 sub do_filelist {
-    my ($params, $opts, $html_header, $page_content) = @_;
+    my ($params, $opts, $page_content) = @_;
 
     if ($params->{errors}{package}) {
        fatal_error( _g( "package not valid or not specified" ) );
@@ -51,7 +48,7 @@ sub do_filelist {
                fatal_error( _g( "No such package in this suite on this architecture." ) );
            } else {
                my @files = unpack "L/(CC/a)", $contents{$pkg};
-               my $file;
+               my $file = '';
 
                $page_content->{files} = [];
                for (my $i=0; $i<scalar @files;) {