aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/term
diff options
context:
space:
mode:
authorSteven Tamm <[email protected]>2002-10-04 15:03:02 +0000
committerSteven Tamm <[email protected]>2002-10-04 15:03:02 +0000
commite989b9bcaf49b784c015cd5e0f9a868f29877f4c (patch)
treee9772d201a0242b0e3849e83accd4c0208a222d5 /lisp/term
parent52402e4fc50aae9c32f04ec22a1a873631a29bad (diff)
Switching return to be treated like an X keysym
Diffstat (limited to 'lisp/term')
-rw-r--r--lisp/term/mac-win.el6
1 files changed, 6 insertions, 0 deletions
diff --git a/lisp/term/mac-win.el b/lisp/term/mac-win.el
index ef5ce486ce..25c66103dd 100644
--- a/lisp/term/mac-win.el
+++ b/lisp/term/mac-win.el
@@ -246,6 +246,12 @@ ascii:-*-Monaco-*-*-*-*-12-*-*-*-*-*-mac-roman")
;; (prefer-coding-system '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])
+;; Tell read-char how to convert special chars to ASCII
+(put 'return 'ascii-character 13)
+
;;
;; Available colors
;;