summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorfukachan <fukachan>2002-12-18 04:24:26 +0000
committerfukachan <fukachan>2002-12-18 04:24:26 +0000
commit0809aa77efe1115f0100db48124e3563814185d9 (patch)
tree4b06777e5b30476c4d7c56dc02ed74deea9f1e14
parent30e7da25a6dbee537d5a17071d24081570e15317 (diff)
downloadfml8-0809aa77efe1115f0100db48124e3563814185d9.tar.gz
fml8-0809aa77efe1115f0100db48124e3563814185d9.tar.bz2
fml8-0809aa77efe1115f0100db48124e3563814185d9.zip
fix comments
-rw-r--r--fml/lib/FML/Error.pm12
1 files changed, 4 insertions, 8 deletions
diff --git a/fml/lib/FML/Error.pm b/fml/lib/FML/Error.pm
index 42643205..31e103f1 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.6 2002/09/11 23:18:02 fukachan Exp $
+# $FML: Error.pm,v 1.7 2002/09/22 14:56:40 fukachan Exp $
#
package FML::Error;
@@ -19,7 +19,7 @@ my $debug = 1;
=head1 NAME
-FML::Error - error manipulation
+FML::Error - analyze error messages.
=head1 SYNOPSIS
@@ -45,7 +45,7 @@ sub new
}
-# Descriptions: analyzer
+# Descriptions: error message analyzer
# Arguments: OBJ($self)
# Side Effects: none
# Return Value: none
@@ -153,7 +153,7 @@ sub deluser
$obj->$method($curproc, $command_args);
};
unless ($@) {
- ; # not show anything
+ ; # log nothing.
}
else {
my $r = $@;
@@ -173,10 +173,6 @@ sub deluser
See C<http://www.fml.org/software/FNF/> on fml coding style guide.
-=head1 CODING STYLE
-
-See C<http://www.fml.org/software/FNF/> on fml coding style guide.
-
=head1 AUTHOR
Ken'ichi Fukamachi