From: dms Date: Sat, 9 Mar 2002 14:16:09 +0000 (+0000) Subject: - "unless if" typo! found by X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=06ae83f16ac881a5fc4d81951f0ae1e6ed2eb562;p=infobot.git - "unless if" typo! found by git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@555 c11ca15a-4712-0410-83d8-924469b57eb5 --- diff --git a/src/Modules/Debian.pl b/src/Modules/Debian.pl index 7ff7708..8cd663e 100644 --- a/src/Modules/Debian.pl +++ b/src/Modules/Debian.pl @@ -243,9 +243,9 @@ sub searchContents { while () { last if ($found > 100); - next unless if (/^\.?\/?(.*?)[\t\s]+(\S+)\n$/); - + next unless (/^\.?\/?(.*?)[\t\s]+(\S+)\n$/); my ($file,$package) = ("/".$1,$2); + if ($query =~ /[\/\*\\]/) { next unless (eval { $file =~ /$regex/ }); return unless &checkEval($@);