httemplate/misc/delete-log_email.html

   1 <% include("/elements/header.html", 'Log email condition configuration') %>
   2 <P>
   3   <A HREF="<% $p %>search/log.html">System Log</A>
   4   | <a href="<% $p %>browse/log_email.html">Log E-Mail Condition</a>
   5 </p>
   6
   7 % if ($error) {
   8 <P STYLE="color: red"><% $error %></P>
   9 % } else {
  10 <H1>Log email condition deleted</H1>
  11 <SCRIPT>
  12 window.top.location = "<% $fsurl %>browse/log_email.html";
  13 </SCRIPT>
  14 % }
  15
  16 <%init>
  17 die "access denied"
  18   unless $FS::CurrentUser::CurrentUser->access_right([ 'View system logs', 'Configuration' ]);
  19
  20 my $error;
  21 my $logemailnum = $cgi->param('logemailnum');
  22
  23 if ( $logemailnum =~ /^\d+$/ ) {
  24   if ( my $log_email = FS::log_email->by_key($logemailnum) ) {
  25     $error = $log_email->delete;
  26   } else {
  27     $error = "logemailnum '$logemailnum' not found";
  28   }
  29 } else {
  30   $error = "bad logemailnum '$logemailnum'";
  31 }
  32
  33 </%init>