Changeset 293 for trunk/dns.cgi

Timestamp:

03/27/12 17:11:59 (12 years ago)

Author:

Kris Deugau

Message:

/trunk

Move action logging for delGroup() into DNSDB.pm. See #35.
Extend checks for Things in the group a little
Delete default reverse records as well

File:

• trunk/dns.cgi (modified) (1 diff)

trunk/dns.cgi

@@ -974 +974 @@
 
   } elsif ($webvar{del} eq 'ok') {
-    my $deleteme = groupName($dbh,$webvar{id}); # get this before we delete it...
-    my $delparent = parentID($dbh, (id => $webvar{id}, type => 'group'));
     my ($code,$msg) = delGroup($dbh, $webvar{id});
     if ($code eq 'OK') {
 ##fixme: need to clean up log when deleting a major container
-      logaction(0, $session->param("username"), $delparent, "Deleted group $deleteme");
-      changepage(page => "grpman", resultmsg => "Deleted group $deleteme");
+      changepage(page => "grpman", resultmsg => $msg);
     } else {
 # need to find failure mode
-      logaction(0, $session->param("username"), $delparent, "Failed to delete group $deleteme: $msg")
-        if $config{log_failures};
-      changepage(page => "grpman", errmsg => "Error deleting group $deleteme: $msg");
+      changepage(page => "grpman", errmsg => $msg);
     }
   } else {