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" ) );
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;) {