[Mew-dist 07861] Re: From filed folding problem on im-109

[SAKAI]

>> In article <19990302175250H.mac at example.com>, Masahide NODA <mac at example.com> writes:

> mew 1.94b12 / im-109 をつかったとき, .im/Config で 

> Name=long long long long long long long long long long long long long Name

> を設定していると, fold されたときに

>> From: long long long long long long long long long long long long long Name
>> <hoge at example.com>

> とならずに

>> From: long long long long long long long long long long long long long Name
>> <hoge at example.com>

> となってしまいます(2 行目の行頭に TAB がない).

すいません、等価な書き換えをしたつもりが、そうなっていませんでした。

以下のパッチで直るはずです。
-- 
酒井 清隆 (E-mail: ksakai at example.com)

-------------- next part --------------
===================================================================
RCS file: RCS/Iso2022jp.pm,v
retrieving revision 1.1
diff -u -r1.1 Iso2022jp.pm
--- Iso2022jp.pm	1999/03/02 08:58:49	1.1
+++ Iso2022jp.pm	1999/03/02 09:02:30
@@ -513,6 +513,7 @@
     my $l2 = length($1);
     if (!$main::NoFolding
 	&& ($l1 + length($space) + $l2 + 1 > $main::Folding_length)) {
+	$space = "\t" if ($space eq '');
 	return "$str1\n$space$str2";
     }
     return "$str1$space$str2";