From: Jeroen van Wolffelaar Date: Fri, 10 Feb 2006 21:52:05 +0000 (+0000) Subject: Fix typo, add entry for contents search X-Git-Tag: switch-to-templates~143 X-Git-Url: https://git.deb.at/w?a=commitdiff_plain;h=062e8d549a090da0d2aa21cf2bdcf068bf4010fc;p=deb%2Fpackages.git Fix typo, add entry for contents search --- diff --git a/cgi-bin/search_packages.pl b/cgi-bin/search_packages.pl index e7cb3b6..0c78978 100755 --- a/cgi-bin/search_packages.pl +++ b/cgi-bin/search_packages.pl @@ -157,6 +157,10 @@ unless (@Packages::CGI::fatal_errors) { push @results, @{ do_names_search( $keyword, \%sources, $sp_obj, \&read_src_entry, \%opts ) }; + } elsif ($searchon eq 'contents') { + require "./search_contents.pl"; + &contents(\$input); + exit; } else { push @results, @{ do_names_search( $keyword, \%packages, $p_obj, @@ -289,7 +293,7 @@ my @pkgs = sort(keys %pkgs, keys %provided_by); my @versions = version_sort keys %{$pkgs{$pkg}{$suite}{$archive}}; my $origin_str = ""; if ($sect{$pkg}{$suite}{$archive}{$versions[0]}) { - $origin_str .= " [$sect{$pkg}{$suite}{$versions[0]}]"; + $origin_str .= " [$sect{$pkg}{$suite}{$archive}{$versions[0]}]"; } printf "
  • %s (%s): %s %s\n", $path, $pkg, $path, $subsect{$pkg}{$suite}{$archive}{$versions[0]},