X-Git-Url: https://git.deb.at/?a=blobdiff_plain;ds=sidebyside;f=lib%2FPackages%2FDoFilelist.pm;h=585504250a2c3842f2478329aa27de3fc648d481;hb=f4bd5d6e5488854bc9633fb5629cc70d1045e9fa;hp=c8061905add7ef5f6a806b5d815ec3d3b4387a89;hpb=49052885778c856da9b93a5f2f9e8877a827c3c5;p=deb%2Fpackages.git

diff --git a/lib/Packages/DoFilelist.pm b/lib/Packages/DoFilelist.pm
index c806190..5855042 100644
--- 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;
@@ -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;) {