X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=lib%2FPackages%2FSearch.pm;h=be7bebd05f1aee4e9f635fd38be82cf7a47dd677;hb=8d87208b82495ee1d9c0d2e9eabdf953f65e3029;hp=d3872672edeadfadc8c259d2546b4141631b7121;hpb=2dc3efc2e8bcf87332099291fe7bf51f3c67d393;p=deb%2Fpackages.git

diff --git a/lib/Packages/Search.pm b/lib/Packages/Search.pm
index d387267..be7bebd 100644
--- a/lib/Packages/Search.pm
+++ b/lib/Packages/Search.pm
@@ -209,10 +209,10 @@ sub do_xapian_search {
 	push @tmp, $keyword;
     }
     my $stemmer = Lingua::Stem->new();
-    my $stemmed_keywords = $stemmer->stem( @tmp );
+    my @stemmed_keywords = grep { length($_) } @{$stemmer->stem( @tmp )};
 
     my $db = Search::Xapian::Database->new( $dbpath );
-    my $enq = $db->enquire( OP_OR, @$keywords, @$stemmed_keywords );
+    my $enq = $db->enquire( OP_OR, @$keywords, @stemmed_keywords );
     debug( "Xapian Query was: ".$enq->get_query()->get_description(), 1) if DEBUG;
     my @matches = $enq->matches(0, 999);