X-Git-Url: https://defaria.com/gitweb/?a=blobdiff_plain;f=maps%2Fbin%2Fadd2nulllist.pl;h=82a371427487a7bdfc4c2b58564ae5705b0cf9d4;hb=8d6e59ba7728e19d42da1533b9f24d0216867899;hp=13324d9d46478a373c067b3c76cac9a8156afee9;hpb=4f37839bc9faacb57d9bce9196d916595f14b114;p=clearscm.git

diff --git a/maps/bin/add2nulllist.pl b/maps/bin/add2nulllist.pl
index 13324d9..82a3714 100755
--- a/maps/bin/add2nulllist.pl
+++ b/maps/bin/add2nulllist.pl
@@ -69,7 +69,7 @@ sub Add2List(@) {
 
     my ($status, $rule) = OnNulllist($item->{sender}, $userid);
 
-    if ($status == 0) {
+    if ($status) {
       display ' Already on list';
     } else {
       my ($message, $msg) = Add2Nulllist(%$item);
@@ -88,16 +88,16 @@ sub Add2List(@) {
 
         if ($seq->{sequence}) {
           my $count = DeleteList(
-            userid   => $item->{userid}
+            userid   => $item->{userid},
             type     => $otherlist,
-            sequence => $seq->{sequence}
+            sequence => $seq->{sequence},
           );
 
           display "Removed $item->{sender} from ${Userid}'s " . ucfirst $otherlist . ' list'
             if $count > 0;
 
           ResequenceList(
-            userid => $rec{userid},
+            userid => $item->{userid},
             type   => $otherlist,
           );
         } # if