From 33a759c9a42bbbfb25378ea5e3c3eabf97d57b23 Mon Sep 17 00:00:00 2001 From: Jeroen van Wolffelaar Date: Thu, 2 Feb 2006 12:34:25 +0000 Subject: [PATCH] Fix thinko, now returning all substring results again s/too much hits/too many hits/ --- cgi-bin/search_packages.pl | 15 +++++++-------- 1 file changed, 7 insertions(+), 8 deletions(-) diff --git a/cgi-bin/search_packages.pl b/cgi-bin/search_packages.pl index 88f9877..255cd56 100755 --- a/cgi-bin/search_packages.pl +++ b/cgi-bin/search_packages.pl @@ -183,7 +183,7 @@ my $search_on_sources = 0; my $st0 = new Benchmark; my @results; -my $too_much_hits; +my $too_many_hits; if ($searchon eq 'sourcenames') { $search_on_sources = 1; } @@ -238,7 +238,7 @@ sub do_names_search { $p_obj->seq( $key, $prefixes, R_CURSOR ); while (index($key, $keyword) >= 0) { if ($prefixes =~ /^\001(\d+)/o) { - $too_much_hits += $1; + $too_many_hits += $1; } else { foreach (split /\000/o, $prefixes) { $_ = '' if $_ eq '^'; @@ -247,13 +247,12 @@ sub do_names_search { } } last if $p_obj->seq( $key, $prefixes, R_NEXT ) != 0; - last if $too_much_hits; - last if keys %pkgs < 100; + last if $too_many_hits or keys %pkgs >= 100; } my $no_results = keys %pkgs; - if ($too_much_hits || ($no_results >= 100)) { - $too_much_hits += $no_results; + if ($too_many_hits || ($no_results >= 100)) { + $too_many_hits += $no_results; %pkgs = ( $keyword => 1 ); } foreach my $pkg (sort keys %pkgs) { @@ -334,8 +333,8 @@ if ($format eq 'html') { } } -if ($too_much_hits) { -print "

Your search was too wide so we will only display exact matches. At least $too_much_hits results have been omitted and will not be displayed. Please consider using a longer keyword or more keywords.

"; +if ($too_many_hits) { +print "

Your search was too wide so we will only display exact matches. At least $too_many_hits results have been omitted and will not be displayed. Please consider using a longer keyword or more keywords.

"; } if (!@results) { -- 2.39.2