+if ( $logemailnum =~ /^\d+$/ ) {
+ if ( my $log_email = FS::log_email->by_key($logemailnum) ) {
+ $error = $log_email->delete;
+ } else {
+ $error = "logemailnum '$logemailnum' not found";
+ }
+} else {
+ $error = "bad logemailnum '$logemailnum'";
+}
+
+</%init>