From: dms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Thu, 1 Feb 2001 14:05:53 +0000 (+0000)
Subject: regex support for 'query' in &searchDesc()
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=6637391b46b54162bc10aaeb11a5d62248b7b63e;p=infobot.git

regex support for 'query' in &searchDesc()


git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@290 c11ca15a-4712-0410-83d8-924469b57eb5
---

diff --git a/src/Modules/Debian.pl b/src/Modules/Debian.pl
index 2701e03..21c9215 100644
--- a/src/Modules/Debian.pl
+++ b/src/Modules/Debian.pl
@@ -450,6 +450,7 @@ sub searchDesc {
 
     my (%desc, $package);
     open(IN,"zegrep -h '^Package|^Description' $files |");
+    $query =~ s/\*/\\S*/g;	# regex.
     while (<IN>) {
 	if (/^Package: (\S+)$/) {
 	    $package = $1;