[Mew-dist 695] Re: mew-expand-file-name & reedit/redist

[OKUNISHI Fujikazu]

手抜かり奥西です。(^_^;

>>>>> "Sat, 15 Mar 1997 22:18:44 +0900" に発信されたメッセージ
>>>>> <19970315221844O.fuji0924 at example.com> にて
>>>>> "僕" == OKUNISHI Fujikazu <fuji0924 at example.com> が仰るには..

僕> またいじってまいました。(^^; 1.64 オリジナルからの差分なので Virtual
僕> mode の OS/2 パッチも入ってます。mew-summary-edit-agein の処理が抜けて
僕> たのも修正してみました。

今度は Virtual mode がまずかったです。(^_^;;

mew-summary-folder-name() での正規表現は手付かずのままで、
mew-summary-message-number() のほうをいじるだけで済むんですね。迂闊 > 自分

以下のようにすれば取り敢えずは OS/2 では Virtual mode を使えていますが、
正規表現は苦手なので、vscan の出力が EOL=LF な環境でも本当に正しく動く
かどうかは自信ありません。

|	(defun mew-summary-message-number ()
	< snip >
|	;;	(if (looking-at ".*\r \\(\\+.*\\) \\(.*\\)\n") ;; ×
|	;	(if (looking-at ".*\r \\(\\+.*\\) \\([0-9]+\\)[\r]?\n]") ;; ×
|		(if (looking-at ".*\r \\(\\+.*\\) \\([0-9]+\\)[\n\r]") ;; ○
|	;	(if (looking-at ".*\r \\(\\+.*\\) \\([0-9]+\\)[\r\n]") ;; ○
	< snip >

もし DOS oriented OS を見捨てないでくださるなら対策をお願い致します。
     ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
＃OS/2 Perl,vscan の出力を EOL=CRLF でなく LF にできれば Lisp をいじら
＃なくてもすむんですが。
----
奥西藤和 / OKUNISHI Fujikazu
mailto:fuji0924 at example.com
# PGP Public Key: mailto:pgp-public-keys at example.com /Subject:GET 0x1B8BF431