diff options
| author | fukachan <fukachan> | 2004-07-23 04:03:38 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2004-07-23 04:03:38 +0000 |
| commit | d013428c2bdb1dfd1eedea62792cada49ef7d3f0 (patch) | |
| tree | b56448d18a1e0fe5e14773697e5e8a79ebd2cbc4 /fml/lib/FML | |
| parent | 7ed2187c730b068585f447f46ff9a8d90fa1c236 (diff) | |
| download | fml8-d013428c2bdb1dfd1eedea62792cada49ef7d3f0.tar.gz fml8-d013428c2bdb1dfd1eedea62792cada49ef7d3f0.tar.bz2 fml8-d013428c2bdb1dfd1eedea62792cada49ef7d3f0.zip | |
fix comments (FNF).
clarify error messages.
Diffstat (limited to 'fml/lib/FML')
| -rw-r--r-- | fml/lib/FML/Error.pm | 23 |
1 files changed, 13 insertions, 10 deletions
diff --git a/fml/lib/FML/Error.pm b/fml/lib/FML/Error.pm index a03d16fa..69bd1ce8 100644 --- a/fml/lib/FML/Error.pm +++ b/fml/lib/FML/Error.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: Error.pm,v 1.30 2004/04/23 04:10:27 fukachan Exp $ +# $FML: Error.pm,v 1.31 2004/05/22 06:19:51 fukachan Exp $ # package FML::Error; @@ -42,7 +42,7 @@ constructor. =cut -# Descriptions: standard constructor +# Descriptions: constructor. # Arguments: OBJ($self) HASH_REF($curproc) # Side Effects: none # Return Value: none @@ -91,7 +91,7 @@ sub get_lock_channel_name =cut -# Descriptions: lock +# Descriptions: lock. # Arguments: OBJ($self) # Side Effects: none # Return Value: none @@ -104,7 +104,7 @@ sub lock } -# Descriptions: unlock +# Descriptions: unlock. # Arguments: OBJ($self) # Side Effects: none # Return Value: none @@ -246,7 +246,7 @@ get the current function. =cut -# Descriptions: set analyzer function name +# Descriptions: set analyzer function name. # Arguments: OBJ($self) STR($fp) # Side Effects: one # Return Value: STR @@ -257,7 +257,7 @@ sub set_analyzer_function } -# Descriptions: set analyzer function name +# Descriptions: get analyzer function name. # Arguments: OBJ($self) # Side Effects: one # Return Value: STR @@ -274,6 +274,9 @@ sub get_analyzer_function check whether $addr is one of addresses this ML uses. +we need this function to exclude list related addresses from removal +target. + =cut @@ -313,7 +316,7 @@ sub is_list_address =head2 remove_bouncers() -delete mail addresses which analyze() determined as bouncers by +delete mail addresses, which analyze() determined as bouncers, by deluser() method. You need to call analyze() method before calling remove_bouncers() to @@ -322,7 +325,7 @@ list up addresses to remove. =cut -# Descriptions: delete addresses analyze() determined as bouncers +# Descriptions: delete addresses analyze() determined as bouncers. # Arguments: OBJ($self) # Side Effects: update user address lists. # Return Value: none @@ -395,7 +398,7 @@ sub deluser $curproc->log("deluser <$address>"); } else { - $curproc->logerror("deluser: invalid address syntax"); + $curproc->logerror("deluser: invalid address syntax: <$address>"); return; } @@ -447,7 +450,7 @@ print list of addresses and the corresponding point. =cut -# Descriptions: dump { address => the current point } +# Descriptions: list up addresses. # Arguments: OBJ($self) HANDLE($handle) # Side Effects: none # Return Value: none |