- when searching in files, limit search results to

  listed packages or the program might crash
- when searching in files, do it case sensitive

1 files changed, 2 insertions, 2 deletions

diff --git a/rpmdrake b/rpmdrake
index d261dc8f..b0badc1d 100755
--- a/rpmdrake
+++ b/rpmdrake
@@ -422,8 +422,8 @@ sub run_treeview_dialog {
 		/^NAME<([^>]+)> VERSION<([^>]+)> RELEASE<([^>]+)>/ and $pkg = "$1-$2-$3", next;
 		$pkg or next;
 		my (undef, $file) = split ':', $_;
-		if (eval { $file =~ /$entry/i }) {
-		    push @search_results, $pkg;
+		if (eval { $file =~ /$entry/ }) {
+		    exists $pkgs->{$pkg} and push @search_results, $pkg;
 		    $pkg = '';
 		}
 	    }