diff options
| author | fukachan <fukachan> | 2002-04-11 05:24:41 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2002-04-11 05:24:41 +0000 |
| commit | 879ba7faf9a9b1141f5b1be83f831760715f03a3 (patch) | |
| tree | f6727d14b9e824b8fdfccdd086bbcea07f07a602 /fml | |
| parent | 2e0a34a76220c8e4a5d6d99b28f802993b64cf84 (diff) | |
| download | fml8-879ba7faf9a9b1141f5b1be83f831760715f03a3.tar.gz fml8-879ba7faf9a9b1141f5b1be83f831760715f03a3.tar.bz2 fml8-879ba7faf9a9b1141f5b1be83f831760715f03a3.zip | |
accept commands, e.g. subscribe, allowed for not members
Diffstat (limited to 'fml')
| -rw-r--r-- | fml/lib/FML/Process/Command.pm | 15 |
1 files changed, 11 insertions, 4 deletions
diff --git a/fml/lib/FML/Process/Command.pm b/fml/lib/FML/Process/Command.pm index 884f358e..b5d5a05b 100644 --- a/fml/lib/FML/Process/Command.pm +++ b/fml/lib/FML/Process/Command.pm @@ -3,7 +3,7 @@ # Copyright (C) 2000,2001,2002 Ken'ichi Fukamachi # All rights reserved. # -# $FML: Command.pm,v 1.41 2002/03/30 11:08:36 fukachan Exp $ +# $FML: Command.pm,v 1.42 2002/04/08 12:44:25 fukachan Exp $ # package FML::Process::Command; @@ -248,6 +248,7 @@ sub _is_valid_command # 2. use of this command is allowed in FML::Config or not ? unless ($config->has_attribute("available_commands_for_$mode", $comname)) { + Log("available_commands_for_$mode has no $comname"); $curproc->reply_message("\n$prompt $command"); $curproc->reply_message_nl('command.not_command', "not command, ignored."); @@ -468,9 +469,15 @@ sub _evaluate_command } } else { - LogError("command from not member."); - LogError("command processing stop."); - last COMMAND; + $opts = { comname => $comname, command => $command }; + if ($curproc->_is_valid_command($args, "stranger", $opts)) { + $mode = 'user'; + } + else { + LogError("command from not member."); + LogError("command processing stop."); + last COMMAND; + } } } |