Changeset 547 for trunk/cgi-bin/admin.cgi

Timestamp:

11/08/12 17:56:36 (11 years ago)

Author:

Kris Deugau

Message:

/trunk

Clean up and move last-modified-change for master blocks to
IPDB.pm. See #34.

File:

• trunk/cgi-bin/admin.cgi (modified) (1 diff)

trunk/cgi-bin/admin.cgi

@@ -229 +229 @@
 } elsif ($webvar{action} eq 'touch') {
 
-  $page->param(master => $webvar{whichmaster});
-  $sth = $ip_dbh->prepare("update masterblocks set mtime=now() where cidr='$webvar{whichmaster}'");
-  $sth->execute;
-  if ($sth->err) {
-    $page->param(errmsg => $sth->errstr);
-  }
+  my ($code,$msg) = touchMaster($ip_dbh, $webvar{whichmaster});
+  $page->param(errmsg => $msg) if $code eq 'FAIL';
 
 } elsif ($webvar{action} eq 'listcust') {