httemplate/misc/delete-log_email.html

   1 % if ($error) {
   2 <P STYLE="color: red"><% $error %></P>
   3 % } else {
   4 <H1>Log email condition deleted</H1>
   5 <SCRIPT>
   6 window.top.location.reload();
   7 </SCRIPT>
   8 % }
   9
  10 <%init>
  11 die "access denied"
  12   unless $FS::CurrentUser::CurrentUser->access_right([ 'View system logs', 'Configuration' ]);
  13
  14 my $logemailnum = $cgi->param('logemailnum');
  15 $logemailnum =~ /^\d+$/ or die "bad logemailnum '$logemailnum'";
  16 my $log_email = FS::log_email->by_key($logemailnum)
  17   or die "logemailnum '$logemailnum' not found";
  18 my $error = $log_email->delete;
  19 </%init>
  20