cosmetics (\s*$)

6 files changed, 14 insertions, 14 deletions

diff --git a/fml/lib/FML/CGI/Admin/List.pm b/fml/lib/FML/CGI/Admin/List.pm
index 6831dc59..e6578cf7 100644
--- a/fml/lib/FML/CGI/Admin/List.pm
+++ b/fml/lib/FML/CGI/Admin/List.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: List.pm,v 1.7 2003/02/15 02:54:25 fukachan Exp $
+# $FML: List.pm,v 1.8 2003/02/16 08:52:44 fukachan Exp $
 #
 
 package FML::CGI::Admin::List;
@@ -49,7 +49,7 @@ sub cgi_menu
     my $safe = new FML::Restriction::Base;
     unless ($safe->regexp_match('ml_name', $ml_name)) {
 	croak("invalid ml_name");
-    } 
+    }
 
     # check $map_default included in $map_list.
     unless ($config->has_attribute("cgi_menu_map_list", $map_default)) {
diff --git a/fml/lib/FML/Command/Admin/log.pm b/fml/lib/FML/Command/Admin/log.pm
index d65ca9ae..23cce6ac 100644
--- a/fml/lib/FML/Command/Admin/log.pm
+++ b/fml/lib/FML/Command/Admin/log.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: log.pm,v 1.13 2003/01/27 03:34:36 fukachan Exp $
+# $FML: log.pm,v 1.14 2003/02/16 08:33:09 fukachan Exp $
 #
 
 package FML::Command::Admin::log;
@@ -105,7 +105,7 @@ sub _show_log
     my $linecount    = 0;
     my $maxline      = 0;
     my $curproc      = $self->{ _curproc };
-    my $charset      = ($is_cgi ? 
+    my $charset      = ($is_cgi ?
 			$curproc->language_of_cgi_message() :
 			$curproc->language_default() );
 
diff --git a/fml/lib/FML/MTAControl.pm b/fml/lib/FML/MTAControl.pm
index dc0cee23..9f523ada 100644
--- a/fml/lib/FML/MTAControl.pm
+++ b/fml/lib/FML/MTAControl.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: MTAControl.pm,v 1.18 2003/01/29 09:00:54 fukachan Exp $
+# $FML: MTAControl.pm,v 1.19 2003/02/11 11:04:43 fukachan Exp $
 #
 
 package FML::MTAControl;
@@ -312,7 +312,7 @@ sub _remove_postfix_style_virtual
       LINE:
 	while ($buf = <$rh>) {
 	    if ($buf =~ /\<VIRTUAL\s+$key\@/
-		   .. 
+		   ..
 		$buf =~ /\<\/VIRTUAL\s+$key\@/) {
 		$removed++;
 		next LINE;
diff --git a/fml/lib/FML/MTAControl/Procmail.pm b/fml/lib/FML/MTAControl/Procmail.pm
index 2c3f5013..b8d898c3 100644
--- a/fml/lib/FML/MTAControl/Procmail.pm
+++ b/fml/lib/FML/MTAControl/Procmail.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: Procmail.pm,v 1.7 2003/02/11 11:39:55 fukachan Exp $
+# $FML: Procmail.pm,v 1.8 2003/02/14 01:27:16 fukachan Exp $
 #
 
 package FML::MTAControl::Procmail;
@@ -83,7 +83,7 @@ sub procmail_remove_alias
 
       LINE:
 	while ($buf = <$rh>) {
-	    if ($buf =~ /\<ALIASES\s+$key\@/ 
+	    if ($buf =~ /\<ALIASES\s+$key\@/
 		  ..
 		$buf =~ /\<\/ALIASES\s+$key\@/) {
 		$removed++;
diff --git a/fml/lib/FML/Process/Utils.pm b/fml/lib/FML/Process/Utils.pm
index e2f363c3..25419394 100644
--- a/fml/lib/FML/Process/Utils.pm
+++ b/fml/lib/FML/Process/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.59 2003/02/15 02:54:00 fukachan Exp $
+# $FML: Utils.pm,v 1.60 2003/02/16 08:55:42 fukachan Exp $
 #
 
 package FML::Process::Utils;
@@ -522,7 +522,7 @@ sub myname
 }
 
 
-# Descriptions: return the current action name, 
+# Descriptions: return the current action name,
 #               which syntax is checked by regexp.
 #    Arguments: OBJ($curproc)
 # Side Effects: none
diff --git a/fml/lib/Mail/Message/ToHTML.pm b/fml/lib/Mail/Message/ToHTML.pm
index e0831917..0247c3ff 100644
--- a/fml/lib/Mail/Message/ToHTML.pm
+++ b/fml/lib/Mail/Message/ToHTML.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: ToHTML.pm,v 1.36 2003/02/09 12:31:50 fukachan Exp $
+# $FML: ToHTML.pm,v 1.37 2003/02/11 13:18:54 fukachan Exp $
 #
 
 package Mail::Message::ToHTML;
@@ -17,7 +17,7 @@ my $debug = 0;
 my $URL   =
     "<A HREF=\"http://www.fml.org/software/\">Mail::Message::ToHTML</A>";
 
-my $version = q$FML: ToHTML.pm,v 1.36 2003/02/09 12:31:50 fukachan Exp $;
+my $version = q$FML: ToHTML.pm,v 1.37 2003/02/11 13:18:54 fukachan Exp $;
 if ($version =~ /,v\s+([\d\.]+)\s+/) {
     $version = "$URL $1";
 }
@@ -1296,8 +1296,8 @@ sub _update_relation
 
 	  LINE:
 	    while ($buf = <$rh>) {
-		if ($buf =~ /^$pat_preamble_begin/ 
-		      .. 
+		if ($buf =~ /^$pat_preamble_begin/
+		      ..
 		    $buf =~ /^$pat_preamble_end/) {
 		    if ($buf =~ /^$pat_preamble_end/) {
 			_print_raw_str($wh, $preamble, $code);