diff options
| author | John Shahid <jvshahid@gmail.com> | 2018-05-30 23:55:16 -0400 |
|---|---|---|
| committer | Noam Postavsky <npostavs@gmail.com> | 2018-06-01 23:06:34 -0400 |
| commit | 9ac76456eb104f749aa9c60b99c68a649214efc6 (patch) | |
| tree | f36f75eb4d82fc4743b1a6e56b7f6e2196c7e787 /test/lisp/term-tests.el | |
| parent | 6a672b792512e5c70254844dd59e0ec1ef0870ba (diff) | |
| download | emacs-9ac76456eb104f749aa9c60b99c68a649214efc6.tar.gz | |
Fix column double counting in term.el (Bug#31662)
* lisp/term.el (term-emulate-terminal): Invalidate
`term-current-column' after deleting overwritten text.
Diffstat (limited to 'test/lisp/term-tests.el')
| -rw-r--r-- | test/lisp/term-tests.el | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/test/lisp/term-tests.el b/test/lisp/term-tests.el index 8aaa61a210b..72a9ad1ef74 100644 --- a/test/lisp/term-tests.el +++ b/test/lisp/term-tests.el @@ -89,6 +89,13 @@ first line\r_next line\r\n")) "\e[2;1Hc" "\e[1;2Hb" "\e[1;1Ha") "" t)))) + (should (equal "abcde j" + (term-test-screen-from-input + 10 12 '("abcdefghij" + "\e[H" ;move back to point-min + "abcde" + " j")))) + ;; Relative positioning. (should (equal "ab\ncd" (term-test-screen-from-input |