aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/term
diff options
context:
space:
mode:
authorKaroly Lorentey2005-03-16 16:06:15 +0000
committerKaroly Lorentey2005-03-16 16:06:15 +0000
commit14c0ac78c48e6bdf832e370ef15ecbef6573dd06 (patch)
treeae0aa5371351ec1a2d0bdf7c55e60b8df4b0063c /lisp/term
parent38d2de214077b4e600d9f9d20d7ec81e1f1c8908 (diff)
parenta7679889e8213289331577d1d9e6d1187a20d035 (diff)
downloademacs-14c0ac78c48e6bdf832e370ef15ecbef6573dd06.tar.gz
emacs-14c0ac78c48e6bdf832e370ef15ecbef6573dd06.zip
Merged from miles@gnu.org--gnu-2005 (patch 37-38, 162-182)
Patches applied: * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-162 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-163 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-164 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-165 Merge from gnus--rel--5.10 * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-166 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-167 Tweak obsolete function/variable warning message * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-168 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-169 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-170 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-171 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-172 Merge from gnus--rel--5.10 * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-173 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-174 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-175 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-176 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-177 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-178 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-179 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-180 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-181 Update from CVS * miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-182 Update from CVS * miles@gnu.org--gnu-2005/gnus--rel--5.10--patch-37 Update from CVS * miles@gnu.org--gnu-2005/gnus--rel--5.10--patch-38 Update from CVS git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-309
Diffstat (limited to 'lisp/term')
-rw-r--r--lisp/term/mac-win.el23
1 files changed, 16 insertions, 7 deletions
diff --git a/lisp/term/mac-win.el b/lisp/term/mac-win.el
index d43264f275e..69438c349a4 100644
--- a/lisp/term/mac-win.el
+++ b/lisp/term/mac-win.el
@@ -1010,20 +1010,29 @@ XConsortium: rgb.txt,v 10.41 94/02/20 18:39:36 rws Exp")
1010 1010
1011;; Map certain keypad keys into ASCII characters 1011;; Map certain keypad keys into ASCII characters
1012;; that people usually expect. 1012;; that people usually expect.
1013(define-key function-key-map [return] [?\C-m])
1014(define-key function-key-map [M-return] [?\M-\C-m])
1015(define-key function-key-map [tab] [?\t])
1016(define-key function-key-map [M-tab] [?\M-\t])
1017(define-key function-key-map [backspace] [?\d]) 1013(define-key function-key-map [backspace] [?\d])
1018(define-key function-key-map [M-backspace] [?\M-\d]) 1014(define-key function-key-map [delete] [?\d])
1015(define-key function-key-map [tab] [?\t])
1016(define-key function-key-map [linefeed] [?\n])
1017(define-key function-key-map [clear] [?\C-l])
1018(define-key function-key-map [return] [?\C-m])
1019(define-key function-key-map [escape] [?\e]) 1019(define-key function-key-map [escape] [?\e])
1020(define-key function-key-map [M-backspace] [?\M-\d])
1021(define-key function-key-map [M-delete] [?\M-\d])
1022(define-key function-key-map [M-tab] [?\M-\t])
1023(define-key function-key-map [M-linefeed] [?\M-\n])
1024(define-key function-key-map [M-clear] [?\M-\C-l])
1025(define-key function-key-map [M-return] [?\M-\C-m])
1020(define-key function-key-map [M-escape] [?\M-\e]) 1026(define-key function-key-map [M-escape] [?\M-\e])
1021 1027
1022;; These tell read-char how to convert 1028;; These tell read-char how to convert
1023;; these special chars to ASCII. 1029;; these special chars to ASCII.
1024(put 'return 'ascii-character ?\C-m)
1025(put 'tab 'ascii-character ?\t)
1026(put 'backspace 'ascii-character ?\d) 1030(put 'backspace 'ascii-character ?\d)
1031(put 'delete 'ascii-character ?\d)
1032(put 'tab 'ascii-character ?\t)
1033(put 'linefeed 'ascii-character ?\n)
1034(put 'clear 'ascii-character ?\C-l)
1035(put 'return 'ascii-character ?\C-m)
1027(put 'escape 'ascii-character ?\e) 1036(put 'escape 'ascii-character ?\e)
1028 1037
1029 1038