match phrase

diff --git a/lib/BackupPC/Search/KinoSearch.pm b/lib/BackupPC/Search/KinoSearch.pm
index 0301fa3..e1ba8da 100644 (file)
--- a/lib/BackupPC/Search/KinoSearch.pm
+++ b/lib/BackupPC/Search/KinoSearch.pm
@@ -146,9 +146,11 @@ sub search {
 
        my $sort_spec = KinoSearch::Search::SortSpec->new( rules => $rules );
 
-       $q =~ s/(.)/$1 /g; # _file_path_split
+       my $split = $q;
+       $split =~ s/(.)/$1 /g; # _file_path_split
+       $split = qq{"$split"}; # exact ordering
        my $hits = $self->searcher->hits(
-               query => $q,
+               query => $split,
                sort_spec => $sort_spec,
        );