diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/term/mac-win.el | 7 |
2 files changed, 12 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d3164d55f1b..e63e6a59c74 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2003-01-28 Benjamin Riefenstahl <Benjamin.Riefenstahl@epost.de> + + * term/mac-win.el: Add entries in function-key-map for + [tab], [backspace], [escape]. + 2003-01-28 Kim F. Storm <storm@cua.dk> * info.el (Info-extract-menu-node-name): Another fix for diff --git a/lisp/term/mac-win.el b/lisp/term/mac-win.el index 22a2e7fab30..246d1d66522 100644 --- a/lisp/term/mac-win.el +++ b/lisp/term/mac-win.el @@ -252,6 +252,13 @@ ascii:-*-Monaco-*-*-*-*-12-*-*-*-*-*-mac-roman") ;; Map certain keypad keys into ASCII characters that people usually expect (define-key function-key-map [return] [?\C-m]) (define-key function-key-map [M-return] [?\M-\C-m]) +(define-key function-key-map [tab] [?\t]) +(define-key function-key-map [M-tab] [?\M-\t]) +(define-key function-key-map [backspace] [127]) +(define-key function-key-map [M-backspace] [?\M-\d]) +(define-key function-key-map [escape] [?\e]) +(define-key function-key-map [M-escape] [?\M-\e]) + ;; Tell read-char how to convert special chars to ASCII (put 'return 'ascii-character 13) |