mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-27 08:43:40 -07:00
Code Issues Projects Releases Wiki Activity

(easy-mmode-define-navigation):

Browse source 
Call `recenter' with an arg to prevent redrawing the display.
This commit is contained in:
Miles Bader 2000-10-01 03:38:23 +00:00
parent 6a0b075248
commit aa0c3dca64
2 changed files with 7 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2000-10-01 Miles Bader <miles@gnu.org>
* emacs-lisp/easy-mmode.el (easy-mmode-define-navigation): Call
`recenter' with an arg to prevent redrawing the display.
2000-09-30 Stefan Monnier <monnier@cs.yale.edu>
* emacs-lisp/easy-mmode.el (easy-mmode-pretty-mode-name): Prettier.

3
lisp/emacs-lisp/easy-mmode.el
View file

@ -515,7 +515,8 @@ ENDFUN should return the end position (with or without moving point)."
,(if endfun `(,endfun)
`(re-search-forward ,re nil t 2)))
(point-max))))
(unless (<= endpt (window-end)) (recenter))))))
(unless (<= endpt (window-end))
(recenter '(0)))))))
(defun ,prev-sym (&optional count)
,(format "Go to the previous COUNT'th %s" (or name base-name))
(interactive)