- "unless if" typo! found by <morten@wtf.dk>

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 7ff7708c7c5b2fcf5f2296c070ef27f8e7be2282..8cd663e933afe8b4c8e10caaf40a1fe4b685a8f8 100644 (file)
--- a/src/Modules/Debian.pl
+++ b/src/Modules/Debian.pl
@@ -243,9 +243,9 @@ sub searchContents {
     while (<IN>) {
        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($@);