Mercurial > emacs
changeset 37439:f8c03126b032
(eshell-smart-redisplay): Added some safety code to work around a
redisplay problem I've been having.
| author | John Wiegley <johnw@newartisans.com> |
|---|---|
| date | Tue, 24 Apr 2001 03:14:58 +0000 |
| parents | df3f22466392 |
| children | c93600f74ebd |
| files | lisp/eshell/em-smart.el |
| diffstat | 1 files changed, 5 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/eshell/em-smart.el Tue Apr 24 01:39:55 2001 +0000 +++ b/lisp/eshell/em-smart.el Tue Apr 24 03:14:58 2001 +0000 @@ -262,7 +262,11 @@ (defun eshell-smart-redisplay () "Display as much output as possible, smartly." (if (eobp) - (recenter -1) + (save-excursion + (recenter -1) + ;; trigger the redisplay now, so that we catch any attempted + ;; point motion; this is to cover for a redisplay bug + (eshell-redisplay)) (let ((top-point (point))) (and (memq 'eshell-smart-display-move pre-command-hook) (>= (point) eshell-last-input-start)