From 2d089f7c2e48cb3c2e3b9edc51f095f2feffc7bd Mon Sep 17 00:00:00 2001 From: Vasilij Schneidermann Date: Sun, 17 Apr 2016 00:58:52 +0200 Subject: [PATCH] Support \E[G sequence for absolute column movement --- lisp/term.el | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/lisp/term.el b/lisp/term.el index ecaca50..3bc934e 100644 --- a/lisp/term.el +++ b/lisp/term.el @@ -3260,6 +3260,10 @@ See `term-prompt-regexp'." ;; \E[D - cursor left (terminfo: cub) ((eq char ?D) (term-move-columns (- (max 1 term-terminal-parameter)))) + ;; \E[G - cursor motion to absolute column (terminfo: hpa) + ((eq char ?G) + (term-move-columns (- (max 0 (min term-width term-terminal-parameter)) + (term-current-column)))) ;; \E[J - clear to end of screen (terminfo: ed, clear) ((eq char ?J) (term-erase-in-display term-terminal-parameter)) -- 2.8.0