Fixing up numbers and totals

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

diff --git a/maps/bin/add2nulllist.cgi b/maps/bin/add2nulllist.cgi
index e398f4e..1007526 100755 (executable)
--- 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});
 
-    if ($status != 0) {
+    if ($status) {
       print br {-class => 'error'},
         "The email address $rec{sender} is already on ${Userid}'s $rec{type} list";
     } else {