(term-handle-ansi-escape): Fix off by one error.

2 files changed, 5 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0be9284467a..6e0da2e64db 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2006-05-04  Dan Nicolaescu  <dann@ics.uci.edu>
+
+        * term.el (term-handle-ansi-escape): Fix off by one error.
+
 2006-05-04  Nick Roberts  <nickrob@snap.net.nz>
 
         * progmodes/gdb-ui.el (gdb-force-update): Delete variable...
diff --git a/lisp/term.el b/lisp/term.el
index be4aefaba72..a03970a368b 100644
--- a/lisp/term.el
+++ b/lisp/term.el
@@ -3320,7 +3320,7 @@ See `term-prompt-regexp'."
    ((eq char ?r)
     (term-set-scroll-region
      (1- term-terminal-previous-parameter)
-     term-terminal-parameter))
+     (1- term-terminal-parameter)))
    (t)))
 
 (defun term-set-scroll-region (top bottom)