diff options
| author | fukachan <fukachan> | 2001-12-22 09:21:00 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-12-22 09:21:00 +0000 |
| commit | 8c71d1f4b810babb4620a046ad9c100108887fb1 (patch) | |
| tree | 6d66772cb9889fc4a000c538c92dda9dc0e8498b /fml/lib/Mail/Message/Language | |
| parent | dba338d612f726205c73e51b65fe545a29fc433b (diff) | |
| download | fml8-8c71d1f4b810babb4620a046ad9c100108887fb1.tar.gz fml8-8c71d1f4b810babb4620a046ad9c100108887fb1.tar.bz2 fml8-8c71d1f4b810babb4620a046ad9c100108887fb1.zip | |
remove \s*$
Diffstat (limited to 'fml/lib/Mail/Message/Language')
| -rw-r--r-- | fml/lib/Mail/Message/Language/Japanese/Subject.pm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/fml/lib/Mail/Message/Language/Japanese/Subject.pm b/fml/lib/Mail/Message/Language/Japanese/Subject.pm index 4b24bf65..83279b85 100644 --- a/fml/lib/Mail/Message/Language/Japanese/Subject.pm +++ b/fml/lib/Mail/Message/Language/Japanese/Subject.pm @@ -2,9 +2,9 @@ # # Copyright (C) 2001 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. +# redistribute it and/or modify it under the same terms as Perl itself. # -# $FML: Subject.pm,v 1.2 2001/11/09 10:39:05 fukachan Exp $ +# $FML: Subject.pm,v 1.3 2001/12/16 14:06:41 fukachan Exp $ # @@ -43,7 +43,7 @@ my $CUT_OFF_RERERE_HOOK = ''; # subjec reply pattern -# apply patch from OGAWA Kunihiko <kuni@edit.ne.jp> +# apply patch from OGAWA Kunihiko <kuni@edit.ne.jp> # fml-support:7626 7653 07666 # Re: Re2: Re[2]: Re(2): Re^2: Re*2: # i-mode ? (PR fml-help: 00157 by OGAWA Kunihiko) @@ -84,7 +84,7 @@ within C<Subject:>. # fml-support: 07507 # sub CutOffRe # { -# いままでどおりの Re: とかとっぱらう +# いままでどおりの Re: とかとっぱらう # # if ($LANGUAGE eq 'Japanese') { # 日本語処理依存ライブラリへ飛ぶ @@ -113,7 +113,7 @@ sub cut_off_reply_tag # $subject =~ s/^((\s*|( )*)*($pattern)\s*)+/Re: /oi; $subject =~ s/^((\s|( ))*($pattern)\s*)+/Re: /oi; - if ($CUT_OFF_RERERE_HOOK) { + if ($CUT_OFF_RERERE_HOOK) { eval($CUT_OFF_RERERE_HOOK); &Log($@) if $@; } @@ -132,7 +132,7 @@ sub cut_off_reply_tag Copyright (C) 2001 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. +redistribute it and/or modify it under the same terms as Perl itself. =head1 HISTORY |