summaryrefslogtreecommitdiff
path: root/fml/lib/FML/Command/Admin/flush.pm
diff options
context:
space:
mode:
Diffstat (limited to 'fml/lib/FML/Command/Admin/flush.pm')
-rw-r--r--fml/lib/FML/Command/Admin/flush.pm12
1 files changed, 6 insertions, 6 deletions
diff --git a/fml/lib/FML/Command/Admin/flush.pm b/fml/lib/FML/Command/Admin/flush.pm
index 7645e1f5..8b70adf1 100644
--- a/fml/lib/FML/Command/Admin/flush.pm
+++ b/fml/lib/FML/Command/Admin/flush.pm
@@ -1,10 +1,10 @@
#-*- perl -*-
#
-# Copyright (C) 2004 Ken'ichi Fukamachi
+# Copyright (C) 2004,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: @template.pm,v 1.8 2004/01/01 07:29:27 fukachan Exp $
+# $FML: flush.pm,v 1.1 2004/05/19 13:48:20 fukachan Exp $
#
package FML::Command::Admin::flush;
@@ -17,13 +17,13 @@ use FML::Command::Admin::flushq;
# Descriptions: subscribe user
-# Arguments: OBJ($self) OBJ($curproc) HASH_REF($command_args)
+# Arguments: OBJ($self) OBJ($curproc) OBJ($command_context)
# Side Effects: forward request to subscribe module
# Return Value: none
sub process
{
- my ($self, $curproc, $command_args) = @_;
- $self->SUPER::process($curproc, $command_args);
+ my ($self, $curproc, $command_context) = @_;
+ $self->SUPER::process($curproc, $command_context);
}
@@ -47,7 +47,7 @@ Ken'ichi Fukamachi
=head1 COPYRIGHT
-Copyright (C) 2004 Ken'ichi Fukamachi
+Copyright (C) 2004,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.