From 06ae83f16ac881a5fc4d81951f0ae1e6ed2eb562 Mon Sep 17 00:00:00 2001 From: dms Date: Sat, 9 Mar 2002 14:16:09 +0000 Subject: [PATCH] - "unless if" typo! found by git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@555 c11ca15a-4712-0410-83d8-924469b57eb5 --- src/Modules/Debian.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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($@); -- 2.39.5