[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/simple.el
From: |
Richard M . Stallman |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/simple.el |
Date: |
Fri, 24 Jun 2005 17:11:58 -0400 |
Index: emacs/lisp/simple.el
diff -c emacs/lisp/simple.el:1.733 emacs/lisp/simple.el:1.734
*** emacs/lisp/simple.el:1.733 Thu Jun 23 21:26:31 2005
--- emacs/lisp/simple.el Fri Jun 24 21:11:58 2005
***************
*** 3442,3459 ****
(when (and (not done)
(not (integerp selective-display))
(not (line-move-invisible-p (point))))
- ;; We avoid vertical-motion when possible
- ;; because that has to fontify.
- (forward-line 1)
- ;; If there are overlays in and around
- ;; the text we moved over, we need to be
- ;; sophisticated.
(unless (overlays-in (max (1- pos-before) (point-min))
(min (1+ (point)) (point-max)))
(setq line-done t)))
- ;; Otherwise move a more sophisticated way.
- ;; (What's the logic behind this code?)
(and (not done) (not line-done)
(zerop (vertical-motion 1))
(if (not noerror)
(signal 'end-of-buffer nil)
--- 3442,3455 ----
(when (and (not done)
(not (integerp selective-display))
(not (line-move-invisible-p (point))))
(unless (overlays-in (max (1- pos-before) (point-min))
(min (1+ (point)) (point-max)))
+ ;; We avoid vertical-motion when possible
+ ;; because that has to fontify.
+ (forward-line 1)
(setq line-done t)))
(and (not done) (not line-done)
+ ;; Otherwise move a more sophisticated way.
(zerop (vertical-motion 1))
(if (not noerror)
(signal 'end-of-buffer nil)
***************
*** 3473,3481 ****
(when (and (not done)
(not (integerp selective-display))
(not (line-move-invisible-p (1- (point)))))
- (forward-line -1)
(unless (overlays-in (max (1- (point)) (point-min))
(min (1+ pos-before) (point-max)))
(setq line-done t)))
(and (not done) (not line-done)
(zerop (vertical-motion -1))
--- 3469,3477 ----
(when (and (not done)
(not (integerp selective-display))
(not (line-move-invisible-p (1- (point)))))
(unless (overlays-in (max (1- (point)) (point-min))
(min (1+ pos-before) (point-max)))
+ (forward-line -1)
(setq line-done t)))
(and (not done) (not line-done)
(zerop (vertical-motion -1))
- [Emacs-diffs] Changes to emacs/lisp/simple.el, Kim F . Storm, 2005/06/03
- [Emacs-diffs] Changes to emacs/lisp/simple.el, Luc Teirlinck, 2005/06/04
- [Emacs-diffs] Changes to emacs/lisp/simple.el, Kim F . Storm, 2005/06/05
- [Emacs-diffs] Changes to emacs/lisp/simple.el, Richard M . Stallman, 2005/06/06
- [Emacs-diffs] Changes to emacs/lisp/simple.el, Richard M . Stallman, 2005/06/08
- [Emacs-diffs] Changes to emacs/lisp/simple.el, Lute Kamstra, 2005/06/16
- [Emacs-diffs] Changes to emacs/lisp/simple.el, Juanma Barranquero, 2005/06/16
- [Emacs-diffs] Changes to emacs/lisp/simple.el, Juanma Barranquero, 2005/06/20
- [Emacs-diffs] Changes to emacs/lisp/simple.el, Juanma Barranquero, 2005/06/20
- [Emacs-diffs] Changes to emacs/lisp/simple.el, Richard M . Stallman, 2005/06/23
- [Emacs-diffs] Changes to emacs/lisp/simple.el,
Richard M . Stallman <=
- [Emacs-diffs] Changes to emacs/lisp/simple.el, Juanma Barranquero, 2005/06/29