Changeset 167
- Timestamp:
 - 11/22/11 15:57:52 (14 years ago)
 - File:
 - 
      
- 1 edited
 
- 
          
  trunk/dns.cgi (modified) (1 diff)
 
 
Legend:
- Unmodified
 - Added
 - Removed
 
- 
      
trunk/dns.cgi
r166 r167 779 779 } elsif ($webvar{del} eq 'ok') { 780 780 my $deleteme = groupName($dbh,$webvar{id}); # get this before we delete it... 781 my $delparent = parentID($webvar{id}, 'group','group'); 781 782 my ($code,$msg) = delGroup($dbh, $webvar{id}); 782 783 if ($code ne 'OK') { 783 784 # need to find failure mode 784 logaction(0, $session->param("username"), $ webvar{curgroup}, "Failure deleting group $deleteme: $msg");785 logaction(0, $session->param("username"), $delparent, "Failure deleting group $deleteme: $msg"); 785 786 changepage(page => "grpman", errmsg => "Error deleting group $deleteme: $msg"); 786 787 } else { 787 788 ##fixme: need to clean up log when deleting a major container 788 logaction(0, $session->param("username"), $ webvar{curgroup}, "Deleted group $deleteme");789 logaction(0, $session->param("username"), $delparent, "Deleted group $deleteme"); 789 790 changepage(page => "grpman", resultmsg => "Deleted group $deleteme"); 790 791 }  
  Note:
 See   TracChangeset
 for help on using the changeset viewer.
  ![[ DNS Administrator ]](/fx/dnsadmin-logo.png)