Also apply the display limit to wnpp results

Searching for 'in', 'ip', and other generic queries doesn't make much
sense, but let's fix one thing at the time.


git-svn-id: svn+ssh://svn.debian.org/svn/secure-testing@56634 e39458fd-73e7-0310-bf30-c45bca0a0e42

1 files changed, 9 insertions, 3 deletions

diff --git a/bin/check-new-issues b/bin/check-new-issues
index b1d5ce406f..315bdcbb96 100755
--- a/bin/check-new-issues
+++ b/bin/check-new-issues
@@ -462,9 +462,15 @@ sub auto_search {
 
 		foreach my $p (split /\s+/, $prog) {
 			search_embed($p);
-			for my $we (search_wnpp($p)) {
-				print "$we: $wnpp{$we}\n";
-				wnpp_to_history($we);
+			my @wr = search_wnpp($p);
+			if (scalar @wr > $auto_display_limit) {
+				print scalar @wr, " results from searching '$prog' in WNPP\n";
+			}
+			else {
+				for my $we (@wr) {
+					print "$we: $wnpp{$we}\n";
+					wnpp_to_history($we);
+				}
 			}
 		}
 	}