Commit a1e76a62 authored by Karoly Lorentey's avatar Karoly Lorentey
Browse files

Remove pointless conditional around key substitution block in term/xterm.el (Dan Nicolaescu)

* lisp/term/xterm.el: Remove pointless conditional around key
  substitution block.


git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-369
parent 7d6d7d1a
......@@ -40,9 +40,6 @@
;; definition if found in function-key-map, there are no further
;; lookups in other keymaps.
(let ((m (terminal-local-value 'function-key-map nil)))
;; This stuff takes several seconds; don't do it unless the keys
;; seem to be defined.
(when (lookup-key m [f13])
(substitute-key-definition [f13] [S-f1] m)
(substitute-key-definition [f14] [S-f2] m)
(substitute-key-definition [f15] [S-f3] m)
......@@ -93,7 +90,7 @@
(substitute-key-definition [f57] [A-f9] m)
(substitute-key-definition [f58] [A-f10] m)
(substitute-key-definition [f59] [A-f11] m)
(substitute-key-definition [f60] [A-f12] m)))
(substitute-key-definition [f60] [A-f12] m))
;; Make reloads faster.
(unless xterm-function-map
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment