X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=lib%2FPackages%2FDoSearchContents.pm;h=b1057f83bd51a084baed256bb4eac4b2630e96e9;hb=a38d98d27880c8fc0f4d98646e318ecc1d39884f;hp=b30352575bda686da4579ec2c343aff1be1b67e0;hpb=a8be705f2da028ea6452e492eaad9c511f348a55;p=deb%2Fpackages.git diff --git a/lib/Packages/DoSearchContents.pm b/lib/Packages/DoSearchContents.pm index b303525..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; @@ -190,9 +190,11 @@ sub do_search_contents { scalar keys %results )."

"; $$page_content .= '
'; + ."\n"; foreach my $file (sort keys %results) { - $$page_content .= "'; + $$page_content .= "\n"; } - $$page_content .= '' if @results > 20; + $$page_content .= '\n" if @results > 20; $$page_content .= '
'._g('File').''._g('Packages') - .'
/$file"; + my $file_enc = encode_entities($file); + $file_enc =~ s#(\Q$keyword_enc\E)#$1#g; + $$page_content .= "
/$file_enc"; my @pkgs; foreach my $pkg (sort keys %{$results{$file}}) { my $arch_str = ''; @@ -209,9 +211,9 @@ sub do_search_contents { push @pkgs, "$suite})."\">$pkg$arch_str"; } $$page_content .= join( ", ", @pkgs); - $$page_content .= '
'._g('File').''._g('Packages').'
'._g('File').''._g('Packages')."
'; } } # sub do_search_contents