[Mew-dist 03538] Re: mew-summary-display-{top,bottom}

[SAKAI Kiyotaka]

>> In article <19980128191831N.t-nisimr at example.com>, Takanori-Nishimura <t-nisimr at example.com> writes:

>   ただ、普段は Summary buffer で SPC だけで読もうとしてしまうので、SPC 
> を押せば今までと同様の感じで(mew-summary-toggle-disp-msgがどちらであっ
> てもメールが読めるように)動作するのが一番良いと思っているのですが。

もっとちゃんと書けばよかったのですが、この場合の仕様としては 2つ考えら
れて、

1. "<" や ">" を押したときに、"v" でどっちのモードにしていても最初・最
  後のメールを表示する。

2. "v" でメールを表示していないときは "<" や ">" は移動するだけで、次に
  スペースを押したときにメールを表示する。

というのがあります。

1 がよければ patch1 を、2 がよければ patch2 を使うことになります。
-- 
酒井 清隆 (E-mail: ksakai at example.com)

-------------- next part --------------
Index: mew-summary.el
===================================================================
RCS file: /home/cvsroot/mew-1.93b10/mew-summary.el,v
retrieving revision 1.1.1.1
diff -u -r1.1.1.1 mew-summary.el
--- mew-summary.el	1998/01/29 00:27:02	1.1.1.1
+++ mew-summary.el	1998/01/29 00:43:18
@@ -957,12 +957,14 @@
 (defun mew-summary-display-top ()
   (interactive)
   (goto-char (point-min))
+  (setq mew-summary-buffer-disp-msg t)
   (mew-summary-display))
 
 (defun mew-summary-display-bottom ()
   (interactive)
   (goto-char (point-max))
   (if (not (bobp)) (forward-line -1))
+  (setq mew-summary-buffer-disp-msg t)
   (mew-summary-display))
 
 
-------------- next part --------------
Index: mew-summary.el
===================================================================
RCS file: /home/cvsroot/mew-1.93b10/mew-summary.el,v
retrieving revision 1.1.1.1
diff -u -r1.1.1.1 mew-summary.el
--- mew-summary.el	1998/01/29 00:27:02	1.1.1.1
+++ mew-summary.el	1998/01/29 00:42:47
@@ -957,13 +957,15 @@
 (defun mew-summary-display-top ()
   (interactive)
   (goto-char (point-min))
-  (mew-summary-display))
+  (mew-summary-display)
+  (setq mew-summary-buffer-disp-msg t))
 
 (defun mew-summary-display-bottom ()
   (interactive)
   (goto-char (point-max))
   (if (not (bobp)) (forward-line -1))
-  (mew-summary-display))
+  (mew-summary-display)
+  (setq mew-summary-buffer-disp-msg t))
 
 
 (defun mew-summary-mouse-show (e)