Make erase-in-line conform to ANSI spec in term

When handling \e[<N>K escape sequences, we're supposed to erase both to
the left _and_ to the right of the cursor when N is two.

* lisp/term.el (term-erase-in-line): make condition check more correct

1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/term.el b/lisp/term.el
index a74216f00c5..25f90045925 100644
--- a/lisp/term.el
+++ b/lisp/term.el
@@ -4040,7 +4040,7 @@ all pending output has been dealt with."))
                            '(term-line-wrap t rear-nonsticky t)))))
 
 (defun term-erase-in-line (kind)
-  (when (= kind 1) ;; erase left of point
+  (when (>= kind 1) ;; erase left of point
     (let ((cols (term-horizontal-column)) (saved-point (point)))
       (term-vertical-motion 0)
       (delete-region (point) saved-point)