Mercurial > emacs
diff lisp/term.el @ 105183:e7e9efa5ce16
(term-set-scroll-region, term-handle-ansi-escape):
Undo last change, which didn't fix the problem and introduced others.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Thu, 24 Sep 2009 18:10:44 +0000 |
parents | 500233eb2d72 |
children | af8ed20ba9ca |
line wrap: on
line diff
--- a/lisp/term.el Thu Sep 24 16:59:14 2009 +0000 +++ b/lisp/term.el Thu Sep 24 18:10:44 2009 +0000 @@ -3369,8 +3369,7 @@ ((eq char ?r) (term-set-scroll-region (1- term-terminal-previous-parameter) - (1- term-terminal-parameter)) - (term-goto 0 0)) + (1- term-terminal-parameter))) (t))) (defun term-set-scroll-region (top bottom) @@ -3390,7 +3389,8 @@ (or (term-using-alternate-sub-buffer) (not (and (= term-scroll-start 0) (= term-scroll-end term-height))))) - (term-move-columns (- (term-current-column)))) + (term-move-columns (- (term-current-column))) + (term-goto 0 0)) ;; (defun term-switch-to-alternate-sub-buffer (set) ;; ;; If asked to switch to (from) the alternate sub-buffer, and already (not)