Mercurial > hg > xemacs-beta
diff lisp/keydefs.el @ 5686:c6b1500299a7
recenter-top-bottom synced from GNU and new default for C-l
Partial implementation of recenter-top-bottom. GNU has support for
scroll-margin that is not in XEmacs so that is left out.
lisp/ChangeLog:
2012-09-18 Mats Lidell <matsl@xemacs.org>
* window-xemacs.el (recenter-positions): New defcustom.
(recenter-top-bottom): New command.
(recenter-last-op): New defvar.
* replace.el (perform-replace): Let-bind recenter-last-op to nil.
For def=recenter, replace `recenter' with `recenter-top-bottom'
that is called with `this-command' and `last-command' let-bound to
`recenter-top-bottom'. When the last `def' was not `recenter',
set `recenter-last-op' to nil.
* keydefs.el (global-map): Make recenter-top-bottom new default
for C-l.
etc/ChangeLog:
2012-09-18 Mats Lidell <matsl@xemacs.org>
* TUTORIAL: Updated due to recenter-top-bottom
man/ChangeLog:
2012-09-18 Mats Lidell <matsl@xemacs.org>
* lispref/windows.texi (Vertical Scrolling): Added
recenter-top-bottom and recenter-positions
* xemacs/display.texi (Display): Rearranged and added
documentation due to new function recenter-top-bottom.
author | Mats Lidell <mats.lidell@cag.se> |
---|---|
date | Tue, 18 Sep 2012 08:58:28 +0200 |
parents | 308d34e9f07d |
children | 916b48abd1c6 |
line wrap: on
line diff
--- a/lisp/keydefs.el Sun Sep 16 21:43:21 2012 +0100 +++ b/lisp/keydefs.el Tue Sep 18 08:58:28 2012 +0200 @@ -1,6 +1,6 @@ ;;; keydefs.el --- Define standard keybindings. -;; Copyright (C) 1992-4, 1997 Free Software Foundation, Inc. +;; Copyright (C) 1992-4, 1997, 2012 Free Software Foundation, Inc. ;; Copyright (C) 2000, 2001, 2002 Ben Wing. ;; Maintainer: XEmacs Development Team @@ -444,7 +444,7 @@ ; meta-shift-V, that is. (define-key global-map '(meta V) 'scroll-other-window-down) -(define-key global-map "\C-l" 'recenter) +(define-key global-map "\C-l" 'recenter-top-bottom) (define-key global-map "\M-r" 'move-to-window-line) ;; FSFmacs window.el