Parser/Ncsa.pm: Assure that at least 20 search terms are printed.

[yaala.git] / lib / Yaala / Parser / Ncsa.pm

diff --git a/lib/Yaala/Parser/Ncsa.pm b/lib/Yaala/Parser/Ncsa.pm
index 79d7625..902ba92 100644 (file)
--- a/lib/Yaala/Parser/Ncsa.pm
+++ b/lib/Yaala/Parser/Ncsa.pm
@@ -172,8 +172,9 @@ sub extra
                my $max = $EXTRA->{'search_terms'}{$sorted_terms[0]};
                my @scalar_terms = ();
                
-               while (@sorted_terms and
-                       ($EXTRA->{'search_terms'}{$sorted_terms[0]} / $max) > 0.1)
+               while (@sorted_terms &&
+                       ((($EXTRA->{'search_terms'}{$sorted_terms[0]} / $max) > 0.1)
+                               || (@scalar_terms < 20)))
                {
                        $_ = shift (@sorted_terms);