[Mew-dist 17409] A patch for mew-scan.el

[Makoto Kohno]

河野＠京都です。

summary modeでメッセージのないところで I すると
not a regular file /home/kohno/Mail/inbox
と言われます。

o とかと同じように
No message
と出る方が正しいような気がしたのでpatchです。

1.95b122へのpatchですが、cvsにもあたるのを確認しました。

-------------- next part --------------
--- mew-1.95b122/mew-scan.el.org	Wed Apr 25 16:24:25 2001
+++ mew-1.95b122/mew-scan.el	Thu May 17 15:14:49 2001
@@ -415,8 +415,9 @@
 
 (defun mew-summary-retrieve-message (&optional rev-del)
   (interactive "P")
-  (mew-summary-only
-   (when (mew-summary-exclusive-p)
+  (mew-summary-msg-or-part
+   (mew-summary-only
+    (when (mew-summary-exclusive-p)
      (let* ((fld (mew-summary-folder-name))
 	    (msg (mew-summary-message-number))
 	    (xuidl (mew-header-get-xuidl-from-file fld msg))
@@ -427,7 +428,7 @@
 	 (setq uidl (mew-scan-usc-uidl usc))
 	 (setq size (mew-scan-usc-size usc))
 	 (setq case (mew-scan-usc-case usc))
-	 (mew-pop-retrieve case (list (list size uidl msg)) rev-del fld))))))
+	 (mew-pop-retrieve case (list (list size uidl msg)) rev-del fld)))))))
 
 (defun mew-summary-mark-retrieve-message (&optional rev-del)
   (interactive "P")