diff options
| author | fukachan <fukachan> | 2003-10-17 14:00:51 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2003-10-17 14:00:51 +0000 |
| commit | fcc43baac34aca4a78d6e0148bac05e615b33290 (patch) | |
| tree | 46b9894a663e657b8e125a8da9d5261804da99a0 /fml/lib/FML/Process | |
| parent | 4be5a9c61d22bd96166cbeec2350cfdc6b8382cb (diff) | |
| download | fml8-fcc43baac34aca4a78d6e0148bac05e615b33290.tar.gz fml8-fcc43baac34aca4a78d6e0148bac05e615b33290.tar.bz2 fml8-fcc43baac34aca4a78d6e0148bac05e615b33290.zip | |
command_prompt -> command_mail_reply_prompt
Diffstat (limited to 'fml/lib/FML/Process')
| -rw-r--r-- | fml/lib/FML/Process/Command.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/fml/lib/FML/Process/Command.pm b/fml/lib/FML/Process/Command.pm index eb8278da..c7a70506 100644 --- a/fml/lib/FML/Process/Command.pm +++ b/fml/lib/FML/Process/Command.pm @@ -3,7 +3,7 @@ # Copyright (C) 2000,2001,2002,2003 Ken'ichi Fukamachi # All rights reserved. # -# $FML: Command.pm,v 1.88 2003/08/23 07:24:46 fukachan Exp $ +# $FML: Command.pm,v 1.89 2003/08/29 15:34:06 fukachan Exp $ # package FML::Process::Command; @@ -318,7 +318,7 @@ sub _config_permit_command my ($curproc, $args, $level, $opts) = @_; my $config = $curproc->config(); my $cred = $curproc->{ credential }; # user credential - my $prompt = $config->{ command_prompt } || '>>>'; + my $prompt = $config->{ command_mail_reply_prompt } || '>>>'; my $comname = $opts->{ comname }; my $command = $opts->{ command }; @@ -355,7 +355,7 @@ sub _is_safe_syntax { my ($curproc, $args, $status, $cominfo) = @_; my $config = $curproc->config(); - my $prompt = $config->{ command_prompt } || '>>>'; + my $prompt = $config->{ command_mail_reply_prompt } || '>>>'; my $level = $status->{ level }; my $command = $cominfo->{ command }; @@ -737,7 +737,7 @@ sub __stop_here { my ($curproc, $args, $status, $cominfo, $orig_command) = @_; my $config = $curproc->config(); - my $prompt = $config->{ command_prompt } || '>>>'; + my $prompt = $config->{ command_mail_reply_prompt } || '>>>'; my $key = $status->{ _stop_reason_key }; my $str = $status->{ _stop_reason_str }; @@ -767,7 +767,7 @@ sub _evaluate_command_lines my $config = $curproc->config(); my $ml_name = $config->{ ml_name }; my $argv = $curproc->command_line_argv(); - my $prompt = $config->{ command_prompt } || '>>>'; + my $prompt = $config->{ command_mail_reply_prompt } || '>>>'; my $mode = 'unknown'; my $rbody = $curproc->incoming_message_body(); my $msg = $rbody->find_first_plaintext_message(); |
