Changeset 145 for trunk


Ignore:
Timestamp:
10/20/11 16:02:30 (13 years ago)
Author:
Kris Deugau
Message:

/trunk

Completed ACL checks on deleting a user
Present a "success" message on deleting a user rather than just
silently dropping you back to the useradmin page

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/dns.cgi

    r144 r145  
    10111011} elsif ($webvar{page} eq 'deluser') {
    10121012
     1013  changepage(page=> "useradmin", errmsg => "You are not allowed to delete users")
     1014        unless $permissions{admin} || $permissions{user_delete};
     1015
    10131016  $page->param(id => $webvar{id});
    10141017  # first pass = confirm y/n (sorta)
     
    10321035      logaction(0, $session->param("username"), $curgroup, "Deleted user $webvar{id}/".$userref->{username}.
    10331036        " (".$userref->{lastname}.", ".$userref->{firstname}.")");
    1034       changepage(page => "useradmin");
     1037      changepage(page => "useradmin", resultmsg => "Deleted user ".$userref->{username}.
     1038        " (".$userref->{lastname}.", ".$userref->{firstname}.")");
    10351039    }
    10361040  } else {
Note: See TracChangeset for help on using the changeset viewer.