report value passed for illegal action pseudo-field

diff --git a/FS/FS/svc_domain.pm b/FS/FS/svc_domain.pm
index b713e3e..2642146 100644 (file)
--- a/FS/FS/svc_domain.pm
+++ b/FS/FS/svc_domain.pm
@@ -342,7 +342,8 @@ sub check {
            " (or unknown registry - try \$whois_hack)";
   }
 
            " (or unknown registry - try \$whois_hack)";
   }
 

-  $recref->{action} =~ /^(M|N)$/ or return "Illegal action";
+  $recref->{action} =~ /^(M|N)$/
+    or return "Illegal action: ". $recref->{action};

   $recref->{action} = $1;
 
   if ( $recref->{catchall} ne '' ) {
   $recref->{action} = $1;
 
   if ( $recref->{catchall} ne '' ) {