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

diff --git a/maps/bin/checkaddress.cgi b/maps/bin/checkaddress.cgi
index 8621719..0912182 100755
--- a/maps/bin/checkaddress.cgi
+++ b/maps/bin/checkaddress.cgi
@@ -37,11 +37,11 @@ my $sender = param ("sender");
 
 sub Heading {
   print
-    header     (-title	=> "MAPS: Check Address"),
+    header     (-title  => "MAPS: Check Address"),
     start_html (-title  => "MAPS: Check Address",
-		-author	=> "Andrew\@DeFaria.com");
-    print h3 {-align	=> "center",
-	      -class	=> "header"},
+                -author => "Andrew\@DeFaria.com");
+    print h3 {-align => "center",
+              -class => "header"},
     "MAPS: Checking address $sender";
 } # Heading
 
@@ -64,24 +64,24 @@ 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"},
       font {-color => "green"},
         "Messages from", b ($sender), "will be", b ("delivered"), br, hr;
-   	print $rule;
+    print $rule;
   } else {
-    ($onlist, $rule) = OnBlacklist $sender;
-    
+    ($onlist, $rule) = OnBlacklist $sender, 0;
+
     if ($onlist) {
       print div {-align	=> "center"},
-        	font {-color	=> "black"},
+           font {-color	=> "black"},
             "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"},
           font {-color	=> "grey"},
@@ -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 {