summaryrefslogtreecommitdiff
path: root/fml/lib/FML/Command/User/subscribe.pm
diff options
context:
space:
mode:
authorfukachan <fukachan>2001-12-23 03:50:26 +0000
committerfukachan <fukachan>2001-12-23 03:50:26 +0000
commit26e324ded666a81b9d98c830bd35bc9c2bd2ed4c (patch)
tree8bd23fdaf1b4a25f2e527119332a29fad9f49a8b /fml/lib/FML/Command/User/subscribe.pm
parentc8babd616b88de3a902d58d85ec1591629509158 (diff)
downloadfml8-26e324ded666a81b9d98c830bd35bc9c2bd2ed4c.tar.gz
fml8-26e324ded666a81b9d98c830bd35bc9c2bd2ed4c.tar.bz2
fml8-26e324ded666a81b9d98c830bd35bc9c2bd2ed4c.zip
update documents, comments
Diffstat (limited to 'fml/lib/FML/Command/User/subscribe.pm')
-rw-r--r--fml/lib/FML/Command/User/subscribe.pm12
1 files changed, 10 insertions, 2 deletions
diff --git a/fml/lib/FML/Command/User/subscribe.pm b/fml/lib/FML/Command/User/subscribe.pm
index 2cd816c1..80318e4b 100644
--- a/fml/lib/FML/Command/User/subscribe.pm
+++ b/fml/lib/FML/Command/User/subscribe.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: subscribe.pm,v 1.6 2001/10/14 00:32:30 fukachan Exp $
+# $FML: subscribe.pm,v 1.7 2001/12/22 09:21:05 fukachan Exp $
#
package FML::Command::User::subscribe;
@@ -24,9 +24,12 @@ FML::Command::User::subscribe - subscribe a new member
=head1 SYNOPSIS
+See C<FML::Command> for more details.
+
=head1 DESCRIPTION
-See C<FML::Command> for more details.
+Firstly apply confirmation before subscribe.
+After confirmation succeeds, subcribe process proceeds.
=head1 METHODS
@@ -35,6 +38,11 @@ See C<FML::Command> for more details.
=cut
+# Descriptions: subscribe adapter: confirm before subscribe
+# Arguments: OBJ($self) OBJ($curproc) HASH_REF($command_args)
+# Side Effects: update database for confirmation.
+# prepare reply message.
+# Return Value: none
sub process
{
my ($self, $curproc, $command_args) = @_;