Commit 411c0104 authored by Chong Yidong's avatar Chong Yidong
Browse files

the latter is not available on ttys anyway.

parent 39a7b589
...@@ -6221,8 +6221,7 @@ See also `normal-erase-is-backspace'." ...@@ -6221,8 +6221,7 @@ See also `normal-erase-is-backspace'."
(cond ((or (memq window-system '(x w32 ns pc)) (cond ((or (memq window-system '(x w32 ns pc))
(memq system-type '(ms-dos windows-nt))) (memq system-type '(ms-dos windows-nt)))
(let* ((bindings (let* ((bindings
`(([C-delete] [C-backspace]) `(([M-delete] [M-backspace])
([M-delete] [M-backspace])
([C-M-delete] [C-M-backspace]) ([C-M-delete] [C-M-backspace])
(,esc-map (,esc-map
[C-delete] [C-backspace]))) [C-delete] [C-backspace])))
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