show illegal dir in error msg
authorivan <ivan>
Thu, 5 Sep 2002 13:01:03 +0000 (13:01 +0000)
committerivan <ivan>
Thu, 5 Sep 2002 13:01:03 +0000 (13:01 +0000)
FS/FS/svc_acct.pm

index 6fe26c8..e62cdd7 100644 (file)
@@ -708,7 +708,7 @@ sub check {
 
 
     $recref->{dir} =~ /^([\/\w\-\.\&]*)$/
-      or return "Illegal directory";
+      or return "Illegal directory: ". $recref->{dir};
     $recref->{dir} = $1;
     return "Illegal directory"
       if $recref->{dir} =~ /(^|\/)\.+(\/|$)/; #no .. component