remove \s*$

10 files changed, 26 insertions, 26 deletions

diff --git a/fml/lib/FML/Config.pm b/fml/lib/FML/Config.pm
index 931ab76f..63508000 100644
--- a/fml/lib/FML/Config.pm
+++ b/fml/lib/FML/Config.pm
@@ -1,7 +1,7 @@
 #-*- perl -*-
 # Copyright (C) 2000-2001 Ken'ichi Fukamachi
 #
-# $FML: Config.pm,v 1.47 2001/12/22 09:21:01 fukachan Exp $
+# $FML: Config.pm,v 1.48 2001/12/24 09:23:00 fukachan Exp $
 #
 
 package FML::Config;
@@ -106,7 +106,7 @@ pseudo variable C<_pid> is reserved for process id reference.
 
 # Descriptions: constructor.
 #               newly blessed object is binded to internal variable
-#               %_fml_config. So changes are shared among all objects. 
+#               %_fml_config. So changes are shared among all objects.
 #    Arguments: OBJ($self) HASH_REF($args)
 # Side Effects: object is binded to common %_fml_config area
 # Return Value: OBJ
@@ -454,7 +454,7 @@ The expanded result is saved in the same hash.
 =cut
 
 
-# Descriptions: expand variable name 
+# Descriptions: expand variable name
 #               e.g. $dir/xxx -> /var/spool/ml/elena/xxx
 #    Arguments: OBJ($self)
 # Side Effects: update config
diff --git a/fml/lib/File/CacheDir.pm b/fml/lib/File/CacheDir.pm
index 99121c52..603e59d5 100644
--- a/fml/lib/File/CacheDir.pm
+++ b/fml/lib/File/CacheDir.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: CacheDir.pm,v 1.11 2002/01/13 05:57:40 fukachan Exp $
+# $FML: CacheDir.pm,v 1.12 2002/01/13 06:59:49 fukachan Exp $
 #
 
 package File::CacheDir;
@@ -44,7 +44,7 @@ If so, the file names become _smtplog.0, _smtplog.1, ...
 The C<File::CacheDir> described above is limited by size.
 
 You can use File::CacheDir based on time not size.
-It is time based expiretion. 
+It is time based expiretion.
 If you so, use new() like this:
 
    $obj = new File::CacheDir {
@@ -58,7 +58,7 @@ where C<cache_type> is C<cyclic> by default.
 
 =head1 DESCRIPTION
 
-To log messages up to some limit, 
+To log messages up to some limit,
 it may be useful to use filenames in cyclic way.
 The file to write is chosen among a set of files allocated as a buffer.
 
@@ -71,7 +71,7 @@ C<ring/> may have 5 files in it.
 To log a message is to write it to one of them.
 At the first time the message is logged to the file C<0>,
 and next time to C<1> and so on.
-If all 5 files are used, 
+If all 5 files are used,
 this module reuses and overwrites the oldest one C<0>.
 So we use a file in cyclic way as follows:
 
@@ -327,7 +327,7 @@ sub find
 }
 
 
-=head2 set(key, value) 
+=head2 set(key, value)
 
 set value for key.
 
diff --git a/fml/lib/File/Sequence.pm b/fml/lib/File/Sequence.pm
index 65edfab2..2f8df52c 100644
--- a/fml/lib/File/Sequence.pm
+++ b/fml/lib/File/Sequence.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: Sequence.pm,v 1.14 2002/01/13 05:57:40 fukachan Exp $
+# $FML: Sequence.pm,v 1.15 2002/01/13 06:59:50 fukachan Exp $
 #
 
 package File::Sequence;
@@ -111,7 +111,7 @@ sub increment_id
 
     # touch the sequence file if it does not exist.
     unless (-f $seq_file) {
-	eval q{ 
+	eval q{
 	    use File::Utils qw(touch);
 	    touch($seq_file);
 	};
diff --git a/fml/lib/File/Utils.pm b/fml/lib/File/Utils.pm
index c3300f79..61df72ff 100644
--- a/fml/lib/File/Utils.pm
+++ b/fml/lib/File/Utils.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: Utils.pm,v 1.9 2002/01/13 06:03:55 fukachan Exp $
+# $FML: Utils.pm,v 1.10 2002/01/13 06:59:50 fukachan Exp $
 #
 
 package File::Utils;
@@ -189,7 +189,7 @@ This routine uses C<IO::File::Atomic> module.
 =cut
 
 
-# Descriptions: copy in atomic way. 
+# Descriptions: copy in atomic way.
 #    Arguments: STR($src) STR($dst)
 # Side Effects: $dst is created/updated.
 # Return Value: NUM
diff --git a/fml/lib/Mail/Delivery/Queue.pm b/fml/lib/Mail/Delivery/Queue.pm
index 44414a08..6750bc0d 100644
--- a/fml/lib/Mail/Delivery/Queue.pm
+++ b/fml/lib/Mail/Delivery/Queue.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: Queue.pm,v 1.7 2001/12/22 09:21:17 fukachan Exp $
+# $FML: Queue.pm,v 1.8 2002/01/13 07:01:28 fukachan Exp $
 #
 
 package Mail::Delivery::Queue;
@@ -180,7 +180,7 @@ where C<$qid> is like this: 990157187.20792.1
 =cut
 
 
-# Descriptions: return queue file list 
+# Descriptions: return queue file list
 #    Arguments: OBJ($self)
 # Side Effects: none
 # Return Value: HASH_ARRAY
diff --git a/fml/lib/Mail/Message.pm b/fml/lib/Mail/Message.pm
index fd8b7a72..80162a48 100644
--- a/fml/lib/Mail/Message.pm
+++ b/fml/lib/Mail/Message.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: Message.pm,v 1.41 2002/01/13 13:26:38 fukachan Exp $
+# $FML: Message.pm,v 1.42 2002/01/13 13:32:09 fukachan Exp $
 #
 
 package Mail::Message;
@@ -437,7 +437,7 @@ You can specify file not file descriptor.
 
 # Descriptions: parse given file (file path or descriptor)
 #               create header OBJ and body OBJ chain.
-#               combine them into one chain of Mail::Message OBJ, 
+#               combine them into one chain of Mail::Message OBJ,
 #               so that we get
 #                  header -> body1 -> body2 -> ... body-end
 #               object chain.
@@ -1535,7 +1535,7 @@ sub _next_part_pos
 }
 
 
-# Descriptions: get the current position 
+# Descriptions: get the current position
 #    Arguments: OBJ($self)
 # Side Effects: none
 # Return Value: NUM
diff --git a/fml/lib/Mail/Message/Date.pm b/fml/lib/Mail/Message/Date.pm
index 5e83beb5..477b8d56 100644
--- a/fml/lib/Mail/Message/Date.pm
+++ b/fml/lib/Mail/Message/Date.pm
@@ -2,7 +2,7 @@
 #
 # Copyright (C) 2000 Ken'ichi Fukamachi
 #
-# $FML: Date.pm,v 1.7 2001/12/24 02:26:34 fukachan Exp $
+# $FML: Date.pm,v 1.8 2001/12/24 12:52:46 fukachan Exp $
 #
 
 package Mail::Message::Date;
@@ -155,7 +155,7 @@ sub YYYYMMDD
 }
 
 
-# Descriptions: return e.g. 1999/09/13 style 
+# Descriptions: return e.g. 1999/09/13 style
 #    Arguments: OBJ($self) NUM($time)
 # Side Effects: none
 # Return Value: STR
diff --git a/fml/lib/Mail/Message/Parse.pm b/fml/lib/Mail/Message/Parse.pm
index 2b6c5bde..790dce4e 100644
--- a/fml/lib/Mail/Message/Parse.pm
+++ b/fml/lib/Mail/Message/Parse.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: Parse.pm,v 1.3 2001/12/22 09:21:19 fukachan Exp $
+# $FML: Parse.pm,v 1.4 2001/12/24 12:52:46 fukachan Exp $
 #
 
 
@@ -18,7 +18,7 @@ use Mail::Message;
 @ISA = qw(Mail::Message);
 
 
-# Descriptions: fake constructor. 
+# Descriptions: fake constructor.
 #               run Mail::Message->parse($args) in fact.
 #    Arguments: OBJ($self) HASH_REF($args)
 # Side Effects: none
diff --git a/fml/lib/Mail/ThreadTrack/Analyze.pm b/fml/lib/Mail/ThreadTrack/Analyze.pm
index 54ee9de2..2d62fb74 100644
--- a/fml/lib/Mail/ThreadTrack/Analyze.pm
+++ b/fml/lib/Mail/ThreadTrack/Analyze.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: Analyze.pm,v 1.20 2001/12/22 09:21:20 fukachan Exp $
+# $FML: Analyze.pm,v 1.21 2001/12/26 14:23:30 fukachan Exp $
 #
 
 package Mail::ThreadTrack::Analyze;
@@ -421,8 +421,8 @@ sub _extract_thread_id_in_subject
 }
 
 
-# Descriptions: 
-#               For example, consider a posting to both elena ML and 
+# Descriptions:
+#               For example, consider a posting to both elena ML and
 #               rudo (DM) from kenken.
 #
 #                    From: kenken
diff --git a/fml/lib/Mail/ThreadTrack/DB.pm b/fml/lib/Mail/ThreadTrack/DB.pm
index 425c2528..0c3a9458 100644
--- a/fml/lib/Mail/ThreadTrack/DB.pm
+++ b/fml/lib/Mail/ThreadTrack/DB.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: DB.pm,v 1.17 2001/12/22 09:21:20 fukachan Exp $
+# $FML: DB.pm,v 1.18 2001/12/26 14:23:30 fukachan Exp $
 #
 
 package Mail::ThreadTrack::DB;
@@ -50,7 +50,7 @@ my @kind_of_databases = qw(thread_id date status sender articles
                            message_id);
 
 
-# Descriptions: open database by tie() 
+# Descriptions: open database by tie()
 #    Arguments: OBJ($self)
 # Side Effects: none
 # Return Value: none