method naming fixed to $curproc->OBJ_METHOD() form (FNF).

get_article_id                 -> article_get_id
set_article_id                 -> article_set_id
config_files_append_to_list    -> config_files_append
append_to_config_files_list    -> config_files_append_to_list
get_config_files_list          -> config_files_get_list
load_config_files              -> config_files_load
set_config_files_list          -> config_files_set_list
verify_sender_credential       -> credential_verify_sender
get_current_process_ml_name    -> current_process_get_ml_name
set_current_process_ml_name    -> current_process_set_ml_name
fix_perl_include_path          -> env_fix_perl_include_path
parse_exception                -> exception_parse
parse_incoming_message         -> incoming_message_parse
clean_up_incoming_queue        -> incoming_message_queue_clean_up
get_cui_menu                   -> menu_get_cui_config_file_path
get_gui_menu                   -> menu_get_gui_config_file_path
resolve_ml_specific_variables  -> ml_variables_resolve
outgoing_message_open_channel  -> outgoing_message_cache_open
open_outgoing_message_channel  -> outgoing_message_open_channel
inform_reply_messages          -> reply_message_inform
prepare_file_to_return         -> reply_message_prepare_template
clean_up_tmpfiles              -> tmp_files_clean_up
reset_umask                    -> umask_reset
set_umask_as_public            -> umask_set_as_public

1 files changed, 7 insertions, 7 deletions

diff --git a/fml/lib/FML/Process/Command.pm b/fml/lib/FML/Process/Command.pm
index 9b483609..0cc5b52c 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,2004,2005 Ken'ichi Fukamachi
 #          All rights reserved.
 #
-# $FML: Command.pm,v 1.111 2004/12/05 16:19:08 fukachan Exp $
+# $FML: Command.pm,v 1.112 2005/05/27 00:57:18 fukachan Exp $
 #
 
 package FML::Process::Command;
@@ -83,14 +83,14 @@ sub prepare
     my $eval = $config->get_hook( 'command_mail_prepare_start_hook' );
     if ($eval) { eval qq{ $eval; }; $curproc->logwarn($@) if $@; }
 
-    $curproc->resolve_ml_specific_variables();
-    $curproc->load_config_files();
-    $curproc->fix_perl_include_path();
+    $curproc->ml_variables_resolve();
+    $curproc->config_files_load();
+    $curproc->env_fix_perl_include_path();
     $curproc->scheduler_init();
     $curproc->log_message_init();
 
     if ($config->yes('use_command_mail_function')) {
-	$curproc->parse_incoming_message();
+	$curproc->incoming_message_parse();
     }
     else {
 	$curproc->logerror("use of command_mail_program prohibited");
@@ -121,7 +121,7 @@ sub verify_request
     my $eval = $config->get_hook( 'command_mail_verify_request_start_hook' );
     if ($eval) { eval qq{ $eval; }; $curproc->logwarn($@) if $@; }
 
-    $curproc->verify_sender_credential();
+    $curproc->credential_verify_sender();
 
     unless ($curproc->is_refused()) {
 	$curproc->_check_filter();
@@ -259,7 +259,7 @@ sub finish
     my $eval = $config->get_hook( 'command_mail_finish_start_hook' );
     if ($eval) { eval qq{ $eval; }; $curproc->logwarn($@) if $@; }
 
-    $curproc->inform_reply_messages();
+    $curproc->reply_message_inform();
     $curproc->queue_flush();
 
     $eval = $config->get_hook( 'command_mail_finish_end_hook' );