diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/test-term-tmux-history.el | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/test-term-tmux-history.el b/tests/test-term-tmux-history.el index c7154e5d2..1dbf6b0bf 100644 --- a/tests/test-term-tmux-history.el +++ b/tests/test-term-tmux-history.el @@ -288,5 +288,13 @@ returns to semi-char from EAT's emacs/char mode -- one exit key for both." (cj/term-send-escape) (should (equal sent '("\e")))))) +(ert-deftest test-term-word-motion-arrows-forwarded-not-window-arrows () + "Normal: C-/M-left/right forward to the terminal (word motion in the program's +input) instead of moving Emacs point; windmove's S-arrows still reach Emacs." + (dolist (key '("C-<left>" "C-<right>" "M-<left>" "M-<right>")) + (should (eq (keymap-lookup eat-semi-char-mode-map key) #'eat-self-input))) + (dolist (key '("S-<left>" "S-<right>")) + (should-not (eq (keymap-lookup eat-semi-char-mode-map key) #'eat-self-input)))) + (provide 'test-term-tmux-history) ;;; test-term-tmux-history.el ends here |