Mercurial > emacs
comparison lisp/term/xterm.el @ 83638:38ddb24da427
(terminal-init-xterm): Fix previous change.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Sat, 23 Jun 2007 17:53:27 +0000 |
| parents | a53f9d3dc94d |
| children | fd5b4a865d1d |
comparison
equal
deleted
inserted
replaced
| 83637:3bb19e773d04 | 83638:38ddb24da427 |
|---|---|
| 389 (substitute-key-definition [f57] [A-f9] local-function-key-map) | 389 (substitute-key-definition [f57] [A-f9] local-function-key-map) |
| 390 (substitute-key-definition [f58] [A-f10] local-function-key-map) | 390 (substitute-key-definition [f58] [A-f10] local-function-key-map) |
| 391 (substitute-key-definition [f59] [A-f11] local-function-key-map) | 391 (substitute-key-definition [f59] [A-f11] local-function-key-map) |
| 392 (substitute-key-definition [f60] [A-f12] local-function-key-map) | 392 (substitute-key-definition [f60] [A-f12] local-function-key-map) |
| 393 | 393 |
| 394 (let ((map (make-sparse-keymap))) | 394 (let ((map (copy-keymap xterm-function-map))) |
| 395 | 395 |
| 396 ;; Use inheritance to let the main keymap override those defaults. | 396 ;; Use inheritance to let the main keymap override those defaults. |
| 397 ;; This way we don't override terminfo-derived settings or settings | 397 ;; This way we don't override terminfo-derived settings or settings |
| 398 ;; made in the .emacs file. | 398 ;; made in the .emacs file. |
| 399 (set-keymap-parent map (keymap-parent local-function-key-map)) | 399 (set-keymap-parent map (keymap-parent local-function-key-map)) |