X-Git-Url: https://defaria.com/gitweb/?a=blobdiff_plain;f=maps%2Fbin%2Fadd2nulllist.cgi;h=d4b7f731c5027fbbf729f388049e999a154b4b0e;hb=7ddf095f187ca60d9a70fb83b2bc3c2b6d91f088;hp=e398f4e2887f5c095938dd991194cae336bf82c4;hpb=ae9e57b169de143d2b8a7c761c3bf7394385e0d0;p=clearscm.git

diff --git a/maps/bin/add2nulllist.cgi b/maps/bin/add2nulllist.cgi
index e398f4e..d4b7f73 100755
--- a/maps/bin/add2nulllist.cgi
+++ b/maps/bin/add2nulllist.cgi
@@ -20,6 +20,7 @@ use FindBin;
 local $0 = $FindBin::Script;
 
 use lib "$FindBin::Bin/../lib";
+use lib "$FindBin::Bin/../../lib";
 
 use Utils;
 
@@ -46,13 +47,13 @@ sub Add2List(%) {
     $rec{hit_count} = param "hit_count$nextseq";
     $rec{retention} = param "retention$nextseq";
 
-    last unless $rec{pattern }or $rec{domain};
+    last unless $rec{pattern} or $rec{domain};
 
     $rec{sender} = CheckEmail $rec{pattern}, $rec{domain};
 
-    my ($status, $rule) = OnNulllist($rec{sender});
+    my ($status) = OnNulllist($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 {