diff lisp/term/mac-win.el @ 49504:0ffb4e489776

2003-01-28 Benjamin Riefenstahl <Benjamin.Riefenstahl@epost.de> * macterm.c (keycode_to_xkeysym_table): Add <tab>, <backspace>, <escape>. (keycode_to_xkeysym_table): Reformat and add more comments. (XTread_socket): Drop special case for backspace. * term/mac-win.el: Add entries in function-key-map for [tab], [backspace], [escape].
author Andrew Choi <akochoi@shaw.ca>
date Tue, 28 Jan 2003 18:46:07 +0000
parents 689e43474805
children 5ade352e8d1c
line wrap: on
line diff
--- a/lisp/term/mac-win.el	Tue Jan 28 17:30:12 2003 +0000
+++ b/lisp/term/mac-win.el	Tue Jan 28 18:46:07 2003 +0000
@@ -252,6 +252,13 @@
 ;; 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)