Merge branch 'master' of git+ssh://github.com/adefaria/clearscm

[clearscm.git] / maps / bin / add2blacklist.cgi

diff --git a/maps/bin/add2blacklist.cgi b/maps/bin/add2blacklist.cgi
index 469ef20..cbc395f 100755 (executable)
--- a/maps/bin/add2blacklist.cgi
+++ b/maps/bin/add2blacklist.cgi
@@ -19,6 +19,7 @@ use FindBin;
 local $0 = $FindBin::Script;
 
 use lib "$FindBin::Bin/../lib";
+use lib "$FindBin::Bin/../../lib";
 
 use Utils;
 
@@ -49,9 +50,9 @@ sub Add2List(%) {
 
     $rec{sender} = CheckEmail $rec{pattern}, $rec{domain};
 
-    my ($status, $rule) = OnBlacklist($rec{sender});
+    my ($status) = OnBlacklist($rec{sender});
 
-    if ($status != 0) {
+    if ($status) {
       print br {-class => 'error'},
         "The email address $rec{sender} is already on ${Userid}'s $rec{type} list";
     } else {