diff options
| author | Sean Whitton <spwhitton@spwhitton.name> | 2021-08-19 16:48:59 -0700 |
|---|---|---|
| committer | Sean Whitton <spwhitton@spwhitton.name> | 2021-08-19 16:48:59 -0700 |
| commit | 07fcbb558d797272b9f43547da60beda485873a3 (patch) | |
| tree | 77d5da14e9f9d9d8b1d877c70c01296fd3893796 /lisp/term/st.el | |
| parent | c9bdeff3e45a7ac84a74a81bb048046f82dddc91 (diff) | |
| parent | fb81c8c3adf8633f2f617c82f6019aef630860c7 (diff) | |
| download | emacs-07fcbb558d797272b9f43547da60beda485873a3.tar.gz | |
Merge remote-tracking branch 'origin/master' into athena/unstable
Diffstat (limited to 'lisp/term/st.el')
| -rw-r--r-- | lisp/term/st.el | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/lisp/term/st.el b/lisp/term/st.el index 08432c414af..f1cbad6d59f 100644 --- a/lisp/term/st.el +++ b/lisp/term/st.el @@ -11,10 +11,19 @@ (require 'term/xterm) +(defcustom xterm-st-extra-capabilities '( modifyOtherKeys getSelection + setSelection) + "Extra capabilities supported under \"stterm\"." + :version "28.1" + :type xterm--extra-capabilities-type + :group 'xterm) + (defun terminal-init-st () "Terminal initialization function for st." - (tty-run-terminal-initialization (selected-frame) "xterm")) + ;; Using `check' leads to a two-second timeout. + (let ((xterm-extra-capabilities xterm-st-extra-capabilities)) + (tty-run-terminal-initialization (selected-frame) "xterm"))) (provide 'term/st) -;; st.el ends here +;;; st.el ends here |