update documents, comments

5 files changed, 40 insertions, 8 deletions

diff --git a/fml/lib/FML/Command/User/add.pm b/fml/lib/FML/Command/User/add.pm
index 21993b78..e3541785 100644
--- a/fml/lib/FML/Command/User/add.pm
+++ b/fml/lib/FML/Command/User/add.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: add.pm,v 1.3 2001/10/14 00:32:29 fukachan Exp $
+# $FML: add.pm,v 1.4 2001/12/22 09:21:04 fukachan Exp $
 #
 
 package FML::Command::User::add;
@@ -16,12 +16,18 @@ use FML::Command::Utils;
 use FML::Command::User::subscribe;
 @ISA = qw(FML::Command::User::subscribe FML::Command::Utils);
 
+
+# Descriptions: subscribe user
+#    Arguments: OBJ($self) OBJ($curproc) HASH_REF($command_args)
+# Side Effects: forward request to subscribe module
+# Return Value: none
 sub process
 {
     my ($self, $curproc, $command_args) = @_;
     $self->SUPER::process($curproc, $command_args);
 }
 
+
 =head1 NAME
 
 FML::Command::User::add - add a new member
@@ -32,6 +38,8 @@ See C<FML::Command> for more details.
 
 =head1 DESCRIPTION
 
+forward request to C<subscribe> module.
+
 =head1 AUTHOR
 
 Ken'ichi Fukamachi
diff --git a/fml/lib/FML/Command/User/get.pm b/fml/lib/FML/Command/User/get.pm
index 5e42749b..ffce8039 100644
--- a/fml/lib/FML/Command/User/get.pm
+++ b/fml/lib/FML/Command/User/get.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: get.pm,v 1.5 2001/10/14 00:32:29 fukachan Exp $
+# $FML: get.pm,v 1.6 2001/12/22 09:21:04 fukachan Exp $
 #
 
 package FML::Command::User::get;
@@ -24,10 +24,12 @@ FML::Command::User::get - send back articles
 
 =head1 SYNOPSIS
 
-not yet implemented
+See C<FML::Command> for more details.
 
 =head1 DESCRIPTION
 
+send back articles.
+
 =head1 METHODS
 
 =head2 C<new()>
@@ -35,6 +37,10 @@ not yet implemented
 =cut
 
 
+# Descriptions: send articles by FML::Command::SendFile.
+#    Arguments: OBJ($self) OBJ($curproc) HASH_REF($command_args)
+# Side Effects: none
+# Return Value: none
 sub process
 {
     my ($self, $curproc, $command_args) = @_;
diff --git a/fml/lib/FML/Command/User/guide.pm b/fml/lib/FML/Command/User/guide.pm
index a0b5406e..8ac9b62c 100644
--- a/fml/lib/FML/Command/User/guide.pm
+++ b/fml/lib/FML/Command/User/guide.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: guide.pm,v 1.2 2001/10/14 00:32:29 fukachan Exp $
+# $FML: guide.pm,v 1.3 2001/12/22 09:21:04 fukachan Exp $
 #
 
 package FML::Command::User::guide;
@@ -25,9 +25,11 @@ FML::Command::User::guide - send back guide file
 
 =head1 SYNOPSIS
 
+See C<FML::Command> for more details.
+
 =head1 DESCRIPTION
 
-See C<FML::Command> for more details.
+send back file.
 
 =head1 METHODS
 
@@ -36,6 +38,10 @@ See C<FML::Command> for more details.
 =cut
 
 
+# Descriptions: send file by FML::Command::SendFile.
+#    Arguments: OBJ($self) OBJ($curproc) HASH_REF($command_args)
+# Side Effects: none
+# Return Value: none
 sub process
 {
     my ($self, $curproc, $command_args) = @_;
diff --git a/fml/lib/FML/Command/User/help.pm b/fml/lib/FML/Command/User/help.pm
index 59bcbd79..a9dac735 100644
--- a/fml/lib/FML/Command/User/help.pm
+++ b/fml/lib/FML/Command/User/help.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: help.pm,v 1.5 2001/10/14 00:32:29 fukachan Exp $
+# $FML: help.pm,v 1.6 2001/12/22 09:21:05 fukachan Exp $
 #
 
 package FML::Command::User::help;
@@ -25,6 +25,8 @@ FML::Command::User::help - send back help file
 
 =head1 SYNOPSIS
 
+See C<FML::Command> for more details.
+
 =head1 DESCRIPTION
 
 See C<FML::Command> for more details.
@@ -36,6 +38,10 @@ See C<FML::Command> for more details.
 =cut
 
 
+# Descriptions: send file by FML::Command::SendFile.
+#    Arguments: OBJ($self) OBJ($curproc) HASH_REF($command_args)
+# Side Effects: none
+# Return Value: none
 sub process
 {
     my ($self, $curproc, $command_args) = @_;
diff --git a/fml/lib/FML/Command/User/summary.pm b/fml/lib/FML/Command/User/summary.pm
index c8e9e7b5..154c842b 100644
--- a/fml/lib/FML/Command/User/summary.pm
+++ b/fml/lib/FML/Command/User/summary.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: summary.pm,v 1.2 2001/10/14 00:32:30 fukachan Exp $
+# $FML: summary.pm,v 1.3 2001/12/22 09:21:05 fukachan Exp $
 #
 
 package FML::Command::User::summary;
@@ -25,9 +25,11 @@ FML::Command::User::summary - send back summary file
 
 =head1 SYNOPSIS
 
+See C<FML::Command> for more details.
+
 =head1 DESCRIPTION
 
-See C<FML::Command> for more details.
+send back summary file.
 
 =head1 METHODS
 
@@ -36,6 +38,10 @@ See C<FML::Command> for more details.
 =cut
 
 
+# Descriptions: send file by FML::Command::SendFile.
+#    Arguments: OBJ($self) OBJ($curproc) HASH_REF($command_args)
+# Side Effects: none
+# Return Value: none
 sub process
 {
     my ($self, $curproc, $command_args) = @_;