diff options
| author | fukachan <fukachan> | 2005-06-04 08:49:05 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2005-06-04 08:49:05 +0000 |
| commit | dde828a99ad5c8e0afc414ddcc98068aee21831e (patch) | |
| tree | 9aaefbf1d0dc89982df0d577404f036aeeeb63f1 /fml/lib/FML/Process/State.pm | |
| parent | 798d46f20f1805d35c7a35f0a0ca6ac75926ddfa (diff) | |
| download | fml8-dde828a99ad5c8e0afc414ddcc98068aee21831e.tar.gz fml8-dde828a99ad5c8e0afc414ddcc98068aee21831e.tar.bz2 fml8-dde828a99ad5c8e0afc414ddcc98068aee21831e.zip | |
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
Diffstat (limited to 'fml/lib/FML/Process/State.pm')
| -rw-r--r-- | fml/lib/FML/Process/State.pm | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/fml/lib/FML/Process/State.pm b/fml/lib/FML/Process/State.pm index f9447391..fc23a877 100644 --- a/fml/lib/FML/Process/State.pm +++ b/fml/lib/FML/Process/State.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: State.pm,v 1.19 2005/05/30 06:52:24 fukachan Exp $ +# $FML: State.pm,v 1.20 2005/06/03 09:34:29 fukachan Exp $ # package FML::Process::State; @@ -45,7 +45,7 @@ sub current_process_ml_name_init # Arguments: OBJ($curproc) STR($ml_name) # Side Effects: update pcb. # Return Value: none -sub set_current_process_ml_name +sub current_process_set_ml_name { my ($curproc, $ml_name) = @_; my $pcb = $curproc->pcb(); @@ -58,7 +58,7 @@ sub set_current_process_ml_name # Arguments: OBJ($curproc) # Side Effects: none # Return Value: STR -sub get_current_process_ml_name +sub current_process_get_ml_name { my ($curproc) = @_; my $pcb = $curproc->pcb(); @@ -175,7 +175,7 @@ sub restriction_state_reply_reason # Arguments: OBJ($curproc) NUM($id) # Side Effects: update pcb. # Return Value: NUM -sub set_article_id +sub article_set_id { my ($curproc, $id) = @_; my $pcb = $curproc->pcb(); @@ -188,7 +188,7 @@ sub set_article_id # Arguments: OBJ($curproc) # Side Effects: none # Return Value: NUM -sub get_article_id +sub article_get_id { my ($curproc) = @_; my $pcb = $curproc->pcb(); |