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
;; on under tmux. (This has been the most reliable way to get putty to send
;; 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)))
(set-keymap-parent map (keymap-parent input-decode-map))
(set-keymap-parent input-decode-map map)))
(set-keymap-parent map (keymap-parent input-decode-map))
(set-keymap-parent input-decode-map map))))
;; =================================================================
;; Random Goo.