[mew-dist 23960] mew-summary-jump-{top,bottom}

[Hiroshi Fujishima]

mew-summary-jump-top, mew-summary-jump-bottom で beginning-of-buffer や
end-of-buffer と同じように、(push-mark) してもらえないでしょうか？

-- 
Hiroshi Fujishima


Index: mew-summary4.el
===================================================================
RCS file: /cvsmew/mew/mew-summary4.el,v
retrieving revision 1.102
diff -u -r1.102 mew-summary4.el
--- mew-summary4.el	2003/07/31 05:13:55	1.102
+++ mew-summary4.el	2003/08/01 13:10:17
@@ -188,6 +188,7 @@
 If 'mew-summary-jump-top-then-display' is non-nil, 
 the top message is then displayed."
   (interactive)
+  (push-mark)
   (goto-char (point-min))
   (if mew-summary-jump-top-then-display
       (mew-summary-display nil)))
@@ -197,6 +198,7 @@
 If 'mew-summary-jump-bottom-then-display' is non-nil, 
 the top message is then displayed."
   (interactive)
+  (push-mark)
   (goto-char (point-max))
   (unless (bobp) (forward-line -1))
   (if mew-summary-jump-bottom-then-display