#-*- perl -*- # # Copyright (C) 2001,2002,2003,2005,2006 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. # # $FML: add.pm,v 1.12 2003/12/31 04:08:44 fukachan Exp $ # package FML::Command::User::add; use strict; use vars qw(@ISA @EXPORT @EXPORT_OK $AUTOLOAD); use Carp; use FML::Command::User::subscribe; @ISA = qw(FML::Command::User::subscribe); # Descriptions: subscribe request, which forwarded to subscribe module. # Arguments: OBJ($self) OBJ($curproc) OBJ($command_context) # Side Effects: forward request to subscribe module # Return Value: none sub process { my ($self, $curproc, $command_context) = @_; $self->SUPER::process($curproc, $command_context); } =head1 NAME FML::Command::User::add - subscribe request command =head1 SYNOPSIS See C for more details. =head1 DESCRIPTION Alias of C. This request is forwarded to C module. =head1 CODING STYLE See C on fml coding style guide. =head1 AUTHOR Ken'ichi Fukamachi =head1 COPYRIGHT Copyright (C) 2001,2002,2003,2005,2006 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. =head1 HISTORY FML::Command::User::add first appeared in fml8 mailing list driver package. See C for more details. =cut 1;