% } else {
<H1>Log email condition deleted</H1>
<SCRIPT>
-window.top.location.reload();
+window.top.location = "<% $fsurl %>browse/log_email.html";
</SCRIPT>
% }
die "access denied"
unless $FS::CurrentUser::CurrentUser->access_right([ 'View system logs', 'Configuration' ]);
-my $logemailnum = $cgi->param('logemailnum');
-$logemailnum =~ /^\d+$/ or die "bad logemailnum '$logemailnum'";
-my $log_email = FS::log_email->by_key($logemailnum)
- or die "logemailnum '$logemailnum' not found";
-my $error = $log_email->delete;
+ my $error;
+ my $logemailnum = $cgi->param('logemailnum');
+ if ( $logemailnum && $logemailnum =~ /^\d+$/ ) {
+ if ( my $log_email = FS::log_email->by_key( $logemailnum ) ) {
+ $error = $log_email->delete;
+ }
+ }
</%init>