diff options
| author | fukachan <fukachan> | 2002-04-25 04:15:12 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2002-04-25 04:15:12 +0000 |
| commit | 345ccec262a2e2e0d3520e6ace1c2f0fe3824b9b (patch) | |
| tree | c4fd936799603c537a0b4e2ef1c80e5ea0d3bd49 /fml/lib/FML | |
| parent | 4d93dc875d0d5fd4582ff571dd96f3b18aab03b1 (diff) | |
| download | fml8-345ccec262a2e2e0d3520e6ace1c2f0fe3824b9b.tar.gz fml8-345ccec262a2e2e0d3520e6ace1c2f0fe3824b9b.tar.bz2 fml8-345ccec262a2e2e0d3520e6ace1c2f0fe3824b9b.zip | |
rename variable: available_commands_for_xxx -> commands_for_xxx
Diffstat (limited to 'fml/lib/FML')
| -rw-r--r-- | fml/lib/FML/CGI/Admin/Menu.pm | 4 | ||||
| -rw-r--r-- | fml/lib/FML/CGI/Admin/User.pm | 4 | ||||
| -rw-r--r-- | fml/lib/FML/Process/Command.pm | 6 |
3 files changed, 7 insertions, 7 deletions
diff --git a/fml/lib/FML/CGI/Admin/Menu.pm b/fml/lib/FML/CGI/Admin/Menu.pm index 54c530b1..726674cf 100644 --- a/fml/lib/FML/CGI/Admin/Menu.pm +++ b/fml/lib/FML/CGI/Admin/Menu.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: Menu.pm,v 1.8 2002/04/10 09:51:25 fukachan Exp $ +# $FML: Menu.pm,v 1.9 2002/04/23 09:32:35 fukachan Exp $ # package FML::CGI::Admin::Menu; @@ -172,7 +172,7 @@ sub run_cgi_navigator my $address = $curproc->safe_param_address() || ''; my $config = $curproc->{ config }; my $command_list = - $config->get_as_array_ref('available_commands_for_admin_cgi'); + $config->get_as_array_ref('commands_for_admin_cgi'); # main menu my $ml_name = $curproc->safe_param_ml_name() || '?'; diff --git a/fml/lib/FML/CGI/Admin/User.pm b/fml/lib/FML/CGI/Admin/User.pm index 0d358e21..b4462206 100644 --- a/fml/lib/FML/CGI/Admin/User.pm +++ b/fml/lib/FML/CGI/Admin/User.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: User.pm,v 1.2 2002/03/30 11:08:34 fukachan Exp $ +# $FML: User.pm,v 1.3 2002/04/10 09:51:25 fukachan Exp $ # package FML::CGI::Admin::User; @@ -48,7 +48,7 @@ sub cgi_menu my $address_list = $curproc->get_recipient_list(); my $comname = $command_args->{ comname }; my $command_list = - $config->get_as_array_ref('available_commands_for_admin_cgi'); + $config->get_as_array_ref('commands_for_admin_cgi'); print start_form(-action=>$action, -target=>$target); diff --git a/fml/lib/FML/Process/Command.pm b/fml/lib/FML/Process/Command.pm index 11cdd331..5e8915cc 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.45 2002/04/13 13:52:39 fukachan Exp $ +# $FML: Command.pm,v 1.46 2002/04/13 14:53:08 fukachan Exp $ # package FML::Process::Command; @@ -268,8 +268,8 @@ 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"); + unless ($config->has_attribute("commands_for_$mode", $comname)) { + Log("commands_for_$mode has no $comname"); $curproc->reply_message("\n$prompt $command"); $curproc->reply_message_nl('command.not_command', "not command, ignored."); |