Mercurial > emacs
comparison lisp/reposition.el @ 91204:53108e6cea98
Merge from emacs--devo--0
Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-294
author | Miles Bader <miles@gnu.org> |
---|---|
date | Thu, 06 Dec 2007 09:51:45 +0000 |
parents | f55f9811f5d7 34d2bced4707 |
children | 606f2d163a64 |
comparison
equal
deleted
inserted
replaced
91203:db40129142b2 | 91204:53108e6cea98 |
---|---|
169 (reposition-window)) | 169 (reposition-window)) |
170 (recenter (min ht comment-height))) | 170 (recenter (min ht comment-height))) |
171 ;;(repos-debug-macro "4") | 171 ;;(repos-debug-macro "4") |
172 )))) | 172 )))) |
173 | 173 |
174 ;;;###autoload (define-key esc-map "\C-l" 'reposition-window) | |
175 | |
176 ;;; Auxiliary functions | 174 ;;; Auxiliary functions |
177 | 175 |
178 ;; Return number of screen lines between START and END. | 176 ;; Return number of screen lines between START and END. |
179 (defun repos-count-screen-lines (start end) | 177 (defun repos-count-screen-lines (start end) |
180 (save-excursion | 178 (save-excursion |