Changeset 473 for branches/htmlform/cgi-bin/main.cgi

Timestamp:

08/17/10 16:50:59 (14 years ago)

Author:

Kris Deugau

Message:

/branches/htmlform

Convert newmaster to template. See #3.

File:

• branches/htmlform/cgi-bin/main.cgi (modified) (1 diff)

branches/htmlform/cgi-bin/main.cgi

@@ -91 +91 @@
     printError("You shouldn't have been able to get here.  Access denied.");
   } else {
-
     my $cidr = new NetAddr::IP $webvar{cidr};
-
-    print "<div type=heading align=center>Adding $cidr as master block....</div>\n";
+    $page->param(cidr => "$cidr");
 
     my ($code,$msg) = addMaster($ip_dbh, $webvar{cidr});
 
     if ($code eq 'FAIL') {
-      carp "Transaction aborted because $msg";
       syslog "err", "Could not add master block '$webvar{cidr}' to database: '$msg'";
-      printError("Could not add master block $webvar{cidr} to database: $msg");
+      $page->param(err => $msg);
     } else {
-      print "<div type=heading align=center>Success!</div>\n";
       syslog "info", "$authuser added master block $webvar{cidr}";
     }