X-Git-Url: https://git.deb.at/?p=deb%2Fpackages.git;a=blobdiff_plain;f=lib%2FPackages%2FDoSearchContents.pm;fp=lib%2FPackages%2FDoSearchContents.pm;h=b1057f83bd51a084baed256bb4eac4b2630e96e9;hp=bf0b435e40e0ad9157b53b03bbcabfe34a97aff6;hb=a430a7f2c477de0e9952384e896e7c78cea3f32f;hpb=c68e5b88632e3a9fc0c5994960a22c96d5cdf047 diff --git a/lib/Packages/DoSearchContents.pm b/lib/Packages/DoSearchContents.pm index bf0b435..b1057f8 100644 --- a/lib/Packages/DoSearchContents.pm +++ b/lib/Packages/DoSearchContents.pm @@ -44,7 +44,7 @@ sub do_search_contents { $$menu = ""; my $keyword = $opts->{keywords}; - my $mode = $opts->{mode}; + my $mode = $opts->{mode} || ''; my $suite = $opts->{suite}[0]; my $archive = $opts->{archive}[0] ||''; $Packages::Search::too_many_hits = 0; @@ -193,7 +193,7 @@ sub do_search_contents { ."\n"; foreach my $file (sort keys %results) { my $file_enc = encode_entities($file); - $file_enc =~ s#(\Q$keyword_enc\E)#$1#g; + $file_enc =~ s#(\Q$keyword_enc\E)#$1#g; $$page_content .= "/$file_enc"; my @pkgs; foreach my $pkg (sort keys %{$results{$file}}) {