X-Git-Url: https://defaria.com/gitweb/?a=blobdiff_plain;ds=sidebyside;f=maps%2Fbin%2Fcheckaddress.cgi;h=09121821f5c21694afa9e7623abe326ffe79e72e;hb=ec9dcaa8edb34b1d8be0ce254423294f01ae48ab;hp=06c3bc93569606fe448a069b10b07735acb5c845;hpb=e01a0154aa68c56ffa206646041ea7a965ad93cc;p=clearscm.git

diff --git a/maps/bin/checkaddress.cgi b/maps/bin/checkaddress.cgi
index 06c3bc9..0912182 100755
--- a/maps/bin/checkaddress.cgi
+++ b/maps/bin/checkaddress.cgi
@@ -64,7 +64,7 @@ sub Body {
   # Then we process nulllist people.
   #
   # Finally, we handle return processing
-  ($onlist, $rule) = OnWhitelist $sender;
+  ($onlist, $rule) = OnWhitelist $sender, 0;
 
   if ($onlist) {
     print div {-align => "center"},
@@ -72,7 +72,7 @@ sub Body {
         "Messages from", b ($sender), "will be", b ("delivered"), br, hr;
     print $rule;
   } else {
-    ($onlist, $rule) = OnBlacklist $sender;
+    ($onlist, $rule) = OnBlacklist $sender, 0;
 
     if ($onlist) {
       print div {-align	=> "center"},
@@ -80,7 +80,7 @@ sub Body {
             "Messages from", b ($sender), "will be", b ("blacklisted"), br, hr;
       print $rule;
     } else {
-      ($onlist, $rule) = OnNulllist $sender;
+      ($onlist, $rule) = OnNulllist $sender, 0;
 
       if ($onlist) {
         print div {-align	=> "center"},
@@ -95,10 +95,10 @@ sub Body {
     } # if
   } # if
 
-  print br div {-align	=> "center"},
-    submit (-name    => "submit",
-            -value   => "Close",
-            -onClick => "window.close (self)");
+  print br div {-align => "center"},
+    submit (-name      => "submit",
+            -value     => "Close",
+            -onClick   => "window.close (self)");
 } # Body
 
 sub Footing {