FNF: fix comments

4 files changed, 16 insertions, 13 deletions

diff --git a/fml/lib/FML/Process/Flow.pm b/fml/lib/FML/Process/Flow.pm
index 67cca212..c2b2750b 100644
--- a/fml/lib/FML/Process/Flow.pm
+++ b/fml/lib/FML/Process/Flow.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: Flow.pm,v 1.18 2002/09/22 14:56:53 fukachan Exp $
+# $FML: Flow.pm,v 1.19 2003/01/11 16:05:19 fukachan Exp $
 #
 
 package FML::Process::Flow;
@@ -67,8 +67,7 @@ programs kicked by MTA, command line interfaces and CGI's.
 #                  lock, execute main routine, unlock
 #               4. inform error messages, clean up and more ...
 #    Arguments: OBJ($pkg) HASH_REF($args)
-# Side Effects:
-#               ProcessSwtich() is exported to main:: Name Space.
+# Side Effects: ProcessSwtich() is exported to main:: Name Space.
 # Return Value: none
 sub ProcessStart
 {
diff --git a/fml/lib/FML/Process/Kernel.pm b/fml/lib/FML/Process/Kernel.pm
index 59cff0be..d629cc27 100644
--- a/fml/lib/FML/Process/Kernel.pm
+++ b/fml/lib/FML/Process/Kernel.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: Kernel.pm,v 1.153 2003/01/25 09:14:05 fukachan Exp $
+# $FML: Kernel.pm,v 1.154 2003/01/25 12:04:49 fukachan Exp $
 #
 
 package FML::Process::Kernel;
@@ -952,7 +952,7 @@ sub permit_command
 
 # Descriptions: permit this $type process based on the rules defined
 #               in ${type}_restrictions.
-#    Arguments: OBJ($self) HASH_REF($args) STR($type)
+#    Arguments: OBJ($curproc) HASH_REF($args) STR($type)
 # Side Effects: set the error reason at "check_restriction" n pcb.
 # Return Value: NUM(1 or 0)
 sub _check_restrictions
diff --git a/fml/lib/FML/Process/Scheduler.pm b/fml/lib/FML/Process/Scheduler.pm
index bd9f0233..22f829bc 100644
--- a/fml/lib/FML/Process/Scheduler.pm
+++ b/fml/lib/FML/Process/Scheduler.pm
@@ -1,9 +1,9 @@
 #-*- perl -*-
 #
-# Copyright (C) 2002 Ken'ichi Fukamachi
+# Copyright (C) 2002,2003 Ken'ichi Fukamachi
 #          All rights reserved.
 #
-# $FML: Scheduler.pm,v 1.19 2002/09/22 14:56:54 fukachan Exp $
+# $FML: Scheduler.pm,v 1.20 2002/12/18 04:43:52 fukachan Exp $
 #
 
 package FML::Process::Scheduler;
@@ -48,9 +48,9 @@ sub new
 }
 
 
-# Descriptions:
+# Descriptions: dummy
 #    Arguments: OBJ($self) STR($key)
-# Side Effects:
+# Side Effects: none
 # Return Value: none
 sub queue_in
 {
@@ -60,9 +60,9 @@ sub queue_in
 }
 
 
-# Descriptions:
+# Descriptions: dummy
 #    Arguments: OBJ($self) HASH_REF($args)
-# Side Effects:
+# Side Effects: none
 # Return Value: none
 sub exits
 {
@@ -80,7 +80,7 @@ Ken'ichi Fukamachi
 
 =head1 COPYRIGHT
 
-Copyright (C) 2002 Ken'ichi Fukamachi
+Copyright (C) 2002,2003 Ken'ichi Fukamachi
 
 All rights reserved. This program is free software; you can
 redistribute it and/or modify it under the same terms as Perl itself.
diff --git a/fml/lib/FML/Process/Super.pm b/fml/lib/FML/Process/Super.pm
index efe99c7c..34dc0b0a 100644
--- a/fml/lib/FML/Process/Super.pm
+++ b/fml/lib/FML/Process/Super.pm
@@ -3,7 +3,7 @@
 # Copyright (C) 2003 Ken'ichi Fukamachi
 #          All rights reserved.
 #
-# $FML: Super.pm,v 1.1 2003/01/07 11:43:27 fukachan Exp $
+# $FML: Super.pm,v 1.2 2003/01/11 16:05:20 fukachan Exp $
 #
 
 package FML::Process::Super;
@@ -184,6 +184,10 @@ sub finish
 sub DESTROY {}
 
 
+# Descriptions: open mail queue and list up.
+#    Arguments: OBJ($curproc) HASH_REF($args)
+# Side Effects: none
+# Return Value: none
 sub _queue
 {
     my ($curproc, $args) = @_;