diff options
| author | fukachan <fukachan> | 2004-04-28 04:06:11 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2004-04-28 04:06:11 +0000 |
| commit | 12ea8b0ceddd8b1574d06150752f560a95e137f6 (patch) | |
| tree | 98644101be77ce655e84b18c2ef31fcfee4628cf /fml/lib/FML/User | |
| parent | 4bb57e0f41ca8378e49396256489d932f06ffb3b (diff) | |
| download | fml8-12ea8b0ceddd8b1574d06150752f560a95e137f6.tar.gz fml8-12ea8b0ceddd8b1574d06150752f560a95e137f6.tar.bz2 fml8-12ea8b0ceddd8b1574d06150752f560a95e137f6.zip | |
add missing error messages
Diffstat (limited to 'fml/lib/FML/User')
| -rw-r--r-- | fml/lib/FML/User/Control.pm | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/fml/lib/FML/User/Control.pm b/fml/lib/FML/User/Control.pm index 58fc618d..eed46699 100644 --- a/fml/lib/FML/User/Control.pm +++ b/fml/lib/FML/User/Control.pm @@ -4,7 +4,7 @@ # All rights reserved. This program is free software; you can # redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: Control.pm,v 1.8 2004/01/24 09:05:54 fukachan Exp $ +# $FML: Control.pm,v 1.9 2004/04/23 04:10:28 fukachan Exp $ # package FML::User::Control; @@ -117,6 +117,9 @@ sub useradd } } else { + $curproc->reply_message_nl('error.already_subscribed', + "$address is already subscribed.", + $msg_args); $reason = "$address is already member (map=$_map)"; last MAP; } @@ -216,7 +219,10 @@ sub userdel } } else { - $curproc->logwarn("no such user in map=$_map") if $debug; + $curproc->reply_message_nl('error.no_such_member', + "no such address $address", + $msg_args); + $curproc->logwarn("no such address in map=$_map") if $debug; } } |