[Mew-dist 16472] Re: mew-highlight-body-regionのおそさ

[Kazu Yamamoto ( 山本和彦 )]

From: KOIE Hidetaka (鯉江英隆) <hide at example.com>
Subject: [Mew-dist 16470] RE: mew-highlight-body-regionのおそさ

> 勇気をだして (window-end win t) を試してみたら
> Emacs-20.7はクラッシュしませんでした。

あれ？ 今試したらクラッシュしませんね。他の方も試して下さい。

--かず

Index: mew-highlight.el
===================================================================
RCS file: /usr/home/kazu/cvsroot/Mew/mew/mew-highlight.el,v
retrieving revision 1.70
retrieving revision 1.71
diff -c -r1.70 -r1.71
*** mew-highlight.el	2001/02/17 01:38:19	1.70
--- mew-highlight.el	2001/02/18 23:58:31	1.71
***************
*** 117,123 ****
    (if (and mew-use-highlight-body window-system (mew-message-p))
        (let* ((win (get-buffer-window (current-buffer)))
  	     (beg (window-start win))
! 	     (end (window-end win))) ;; (window-end win t) crashes Emacs 20.7
  	(mew-highlight-body-region beg end)
  	(set-buffer-modified-p nil))))
  
--- 117,123 ----
    (if (and mew-use-highlight-body window-system (mew-message-p))
        (let* ((win (get-buffer-window (current-buffer)))
  	     (beg (window-start win))
! 	     (end (window-end win t)))
  	(mew-highlight-body-region beg end)
  	(set-buffer-modified-p nil))))