fix comments (FNF)

3 files changed, 13 insertions, 12 deletions

diff --git a/fml/lib/FML/Command/Admin/changepassword.pm b/fml/lib/FML/Command/Admin/changepassword.pm
index ea6f718c..05081a99 100644
--- a/fml/lib/FML/Command/Admin/changepassword.pm
+++ b/fml/lib/FML/Command/Admin/changepassword.pm
@@ -1,10 +1,10 @@
 #-*- perl -*-
 #
-#  Copyright (C) 2003,2004 Ken'ichi Fukamachi
+#  Copyright (C) 2003,2004,2005 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: changepassword.pm,v 1.14 2004/04/30 13:38:35 fukachan Exp $
+# $FML: changepassword.pm,v 1.15 2004/07/23 13:03:50 fukachan Exp $
 #
 
 package FML::Command::Admin::changepassword;
@@ -23,7 +23,7 @@ See C<FML::Command> for more details.
 
 =head1 DESCRIPTION
 
-set password of a new address or change password.
+set password for a new address or change password.
 
 =head1 METHODS
 
@@ -232,7 +232,7 @@ Ken'ichi Fukamachi
 
 =head1 COPYRIGHT
 
-Copyright (C) 2003,2004 Ken'ichi Fukamachi
+Copyright (C) 2003,2004,2005 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/Command/DataCheck.pm b/fml/lib/FML/Command/DataCheck.pm
index 366977ad..4d8f7749 100644
--- a/fml/lib/FML/Command/DataCheck.pm
+++ b/fml/lib/FML/Command/DataCheck.pm
@@ -1,10 +1,10 @@
 #-*- perl -*-
 #
-#  Copyright (C) 2002,2003,2004 Ken'ichi Fukamachi
+#  Copyright (C) 2002,2003,2004,2005 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: DataCheck.pm,v 1.15 2004/04/23 04:10:30 fukachan Exp $
+# $FML: DataCheck.pm,v 1.16 2004/06/26 11:47:55 fukachan Exp $
 #
 
 package FML::Command::DataCheck;
@@ -89,7 +89,7 @@ sub parse_command_arguments
 
 
 #
-# XXX-TODO: find_special_keyword() NOT USED ?
+# XXX-TODO: find_special_keyword() NOT USED ? YES. REMOVE IT.
 #
 
 
@@ -132,7 +132,7 @@ sub find_special_keyword
 
 
 #
-# XXX-TODO: find_anonymous_command_mail_allowed_commands() NOT USED?
+# XXX-TODO: find_anonymous_command_mail_allowed_commands() NOT USED? YES. RM!
 #
 
 
@@ -202,7 +202,7 @@ Ken'ichi Fukamachi
 
 =head1 COPYRIGHT
 
-Copyright (C) 2002,2003,2004 Ken'ichi Fukamachi
+Copyright (C) 2002,2003,2004,2005 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/Command/User/get.pm b/fml/lib/FML/Command/User/get.pm
index b9a5e308..975669ba 100644
--- a/fml/lib/FML/Command/User/get.pm
+++ b/fml/lib/FML/Command/User/get.pm
@@ -1,10 +1,10 @@
 #-*- perl -*-
 #
-#  Copyright (C) 2001,2002,2003,2004 Ken'ichi Fukamachi
+#  Copyright (C) 2001,2002,2003,2004,2005 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: get.pm,v 1.22 2004/04/23 04:15:58 fukachan Exp $
+# $FML: get.pm,v 1.23 2004/06/26 11:47:58 fukachan Exp $
 #
 
 package FML::Command::User::get;
@@ -80,6 +80,7 @@ sub check_limit
     my $total_num_req = $total + $nreq;
     $pcb->set('command', 'get_command_total_num_request', $total_num_req);
 
+    # XXX-TODO: same limit value ?
     if ($total_num_req > $limit) {
 	$curproc->reply_message_nl('command.exceed_total_request_limit',
 				   'total requests exceed limit',
@@ -130,7 +131,7 @@ Ken'ichi Fukamachi
 
 =head1 COPYRIGHT
 
-Copyright (C) 2001,2002,2003,2004 Ken'ichi Fukamachi
+Copyright (C) 2001,2002,2003,2004,2005 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.