[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/term/mac-win.el
From: |
YAMAMOTO Mitsuharu |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/term/mac-win.el |
Date: |
Tue, 15 Mar 2005 02:45:58 -0500 |
Index: emacs/lisp/term/mac-win.el
diff -c emacs/lisp/term/mac-win.el:1.33 emacs/lisp/term/mac-win.el:1.34
*** emacs/lisp/term/mac-win.el:1.33 Mon Feb 21 13:09:58 2005
--- emacs/lisp/term/mac-win.el Tue Mar 15 07:45:58 2005
***************
*** 1010,1029 ****
;; 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] [?\d])
! (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])
;; These tell read-char how to convert
;; these special chars to ASCII.
- (put 'return 'ascii-character ?\C-m)
- (put 'tab 'ascii-character ?\t)
(put 'backspace 'ascii-character ?\d)
(put 'escape 'ascii-character ?\e)
--- 1010,1038 ----
;; Map certain keypad keys into ASCII characters
;; that people usually expect.
(define-key function-key-map [backspace] [?\d])
! (define-key function-key-map [delete] [?\d])
! (define-key function-key-map [tab] [?\t])
! (define-key function-key-map [linefeed] [?\n])
! (define-key function-key-map [clear] [?\C-l])
! (define-key function-key-map [return] [?\C-m])
(define-key function-key-map [escape] [?\e])
+ (define-key function-key-map [M-backspace] [?\M-\d])
+ (define-key function-key-map [M-delete] [?\M-\d])
+ (define-key function-key-map [M-tab] [?\M-\t])
+ (define-key function-key-map [M-linefeed] [?\M-\n])
+ (define-key function-key-map [M-clear] [?\M-\C-l])
+ (define-key function-key-map [M-return] [?\M-\C-m])
(define-key function-key-map [M-escape] [?\M-\e])
;; These tell read-char how to convert
;; these special chars to ASCII.
(put 'backspace 'ascii-character ?\d)
+ (put 'delete 'ascii-character ?\d)
+ (put 'tab 'ascii-character ?\t)
+ (put 'linefeed 'ascii-character ?\n)
+ (put 'clear 'ascii-character ?\C-l)
+ (put 'return 'ascii-character ?\C-m)
(put 'escape 'ascii-character ?\e)
- [Emacs-diffs] Changes to emacs/lisp/term/mac-win.el,
YAMAMOTO Mitsuharu <=