Fix the previous commit
Turns out you can't just *call* that function; you need to set it up with defadvice so that it runs when everything is available.
This commit is contained in:
parent
bc05b7d525
commit
47a6a16445
1 changed files with 7 additions and 3 deletions
|
|
@ -218,10 +218,14 @@
|
||||||
;; In addition, make sure various things are working properly with xterm-keys
|
;; In addition, make sure various things are working properly with xterm-keys
|
||||||
;; on under tmux. (This has been the most reliable way to get putty to send
|
;; on under tmux. (This has been the most reliable way to get putty to send
|
||||||
;; the right keystrokes into emacs.)
|
;; the right keystrokes into emacs.)
|
||||||
(if (getenv "TMUX")
|
(defadvice terminal-init-screen
|
||||||
|
;; The advice is named `tmux', and is run before `terminal-init-screen' runs.
|
||||||
|
(before tmux activate)
|
||||||
|
"Apply xterm keymap, allowing use of keys passed through tmux."
|
||||||
|
(if (getenv "TMUX")
|
||||||
(let ((map (copy-keymap xterm-function-map)))
|
(let ((map (copy-keymap xterm-function-map)))
|
||||||
(set-keymap-parent map (keymap-parent input-decode-map))
|
(set-keymap-parent map (keymap-parent input-decode-map))
|
||||||
(set-keymap-parent input-decode-map map)))
|
(set-keymap-parent input-decode-map map))))
|
||||||
|
|
||||||
;; =================================================================
|
;; =================================================================
|
||||||
;; Random Goo.
|
;; Random Goo.
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue