[Mew-dist 03294] Re: mew-1.93b8.tar.gz

[若宮賢二]

若宮＠富士通研です。
すみません、私がイジったところです。

// "つむら" = tsumura at example.com (TSUMURA Tomoaki (津邑公暁)) 氏談:

新岡> XEmacs 20.3 で、Summary モードでマークをつけて `x' を押すと、
新岡> `Buffer +inbox has no process' と表示されてエラーとなります。
新岡> Summary モードにメッセージが残りますが、Message モードには何も表
新岡> 示されません。
つむら> process-status<f> に nil が渡ってるのが悪いような気がしますが、

  すぐに Emacs-20 環境を用意できないので推測ですが、process-stauts で
  プロセス監視を開始する前にプロセスが終了した場合、sentinel がさっさ
  と mew-summary-buffer-process を nil クリアしちゃっていて、
  process-status にその nil が渡っているのではないかと思います。

新村> Emacs 19.34 では問題ありません。
つむら> これがなぜだか よく分かりませんでした。(^^;

  19.28 でも平気でしたが、たしかにタイミングに左右されてもおかしくない
  ですね(_ _)。mew-summary-buffer-process の nil クリアを sentinel に
  やらせないで、プロセス終了確認の後に行なうようにすれば大丈夫かな。以
  下の修正でどうでしょうか？

--- mew-mark.el-	Fri Dec 26 13:32:28 1997
+++ mew-mark.el	Sun Dec 28 18:40:49 1997
@@ -622,6 +622,8 @@
     ;; I'm in at the finish.
     (while (eq (process-status mew-summary-buffer-process) 'run)
       (accept-process-output mew-summary-buffer-process))
+    (setq mew-summary-buffer-process nil)
+    (setq mew-summary-buffer-string nil)
     ))
 
 (defun mew-summary-mvrm-filter (process string)
@@ -652,8 +654,6 @@
 	 ))
       ;; If process was killed, we can't clear the sentinel.
       ;;(set-process-sentinel mew-summary-buffer-process nil)
-      (setq mew-summary-buffer-process nil)
-      (setq mew-summary-buffer-string nil)
       )))
 
 ;;;

// Kenji    | mailto:wkenji at example.com (office)
// Wakamiya | mailto:wkenji at example.com (private)