[mew-dist 27890] Re: incでカーソルがeobに移動しないことがある
Kazu Yamamoto ( 山本和彦 )
kazu at example.com
2007年 11月 20日 (火) 18:21:19 JST
> カーソルは画面中央に移動している感じがします。
そうですね。
Emacs のバグを回避する方法を思いつきました。試してみて下さい。
--かず
Index: mew-highlight.el
===================================================================
RCS file: /cvsroot/mew/mew/mew-highlight.el,v
retrieving revision 1.43
diff -c -r1.43 mew-highlight.el
*** mew-highlight.el 13 Apr 2007 12:24:46 -0000 1.43
--- mew-highlight.el 20 Nov 2007 09:20:11 -0000
***************
*** 38,45 ****
(save-excursion (beginning-of-line) (point)))))
(defun mew-unhighlight-cursor-line ()
! (if (overlayp (mew-sinfo-get-cursor-line))
! (move-overlay (mew-sinfo-get-cursor-line) 1 1)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;
--- 38,48 ----
(save-excursion (beginning-of-line) (point)))))
(defun mew-unhighlight-cursor-line ()
! (when (overlayp (mew-sinfo-get-cursor-line))
! (move-overlay (mew-sinfo-get-cursor-line) 1 1)
! ;; (goto-char (point-max)) works wrong if underline exists.
! ;; Redisplays it so that it works well.
! (sit-for 0)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;
Mew-dist メーリングリストの案内