[Mew-dist 04036] Re: b22

[Kazu Yamamoto ( 山本和彦 )]

From: kayama/かやま <kayama at example.com>
Subject: [Mew-dist 04035] Re: b22
Date: Sat, 28 Feb 1998 21:08:12 +0900

> と、search-failed "^ *\\([0-9]+\\)" と怒られてしまいました。
> Message を表示させていると大丈夫なんですが。

XEmacs でのカーソルのバグを直したら、新たな虫さんの侵入を許したようで
す。

以下で、XEmacs のカーソルも、refile も、うまくいくはずです。

--かず＠虫好き

Index: mew-summary.el
===================================================================
RCS file: /usr/local/cvsroot/mew/mew-summary.el,v
retrieving revision 1.28
diff -c -r1.28 mew-summary.el
*** mew-summary.el	1998/02/28 06:15:28	1.28
--- mew-summary.el	1998/02/28 12:53:20
***************
*** 609,615 ****
  	   ))
        (if (or msg part)
  	  (progn
! 	    (select-window win)
  	    (mew-summary-recenter)
  	    (mew-highlight-cursor-line)
  	    (if next
--- 609,619 ----
  	   ))
        (if (or msg part)
  	  (progn
! 	    ;; pop-to-buffer irritates XEmacs users.
! 	    (and win (select-window win))
! 	    ;; but select-window is not enough if the buffer is NOT
! 	    ;; displayed. 
! 	    (set-buffer buf)
  	    (mew-summary-recenter)
  	    (mew-highlight-cursor-line)
  	    (if next
***************
*** 692,698 ****
  	     (t (message "No message"))
  	     ))
  	(progn
! 	  (select-window win)
  	  (if (null notforce) (mew-summary-recenter))
  	  (mew-highlight-cursor-line)
  	  )
--- 696,706 ----
  	     (t (message "No message"))
  	     ))
  	(progn
! 	  ;; pop-to-buffer irritates XEmacs users.
! 	  (and win (select-window win))
! 	  ;; but select-window is not enough if the buffer is NOT
! 	  ;; displayed. 
! 	  (set-buffer buf)
  	  (if (null notforce) (mew-summary-recenter))
  	  (mew-highlight-cursor-line)
  	  )