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:
John Doty 2014-06-04 06:17:19 -07:00
parent bc05b7d525
commit 47a6a16445

View file

@ -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.