Mercurial > hg > xemacs-beta

comparison lisp/term/AT386.el @ 52:461c7ba8286a r19-16-pre1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-16-pre1
author cvs
date Mon, 13 Aug 2007 08:57:19 +0200
parents 376386a54a3c
children 131b0175ea99
comparison
equal deleted inserted replaced
51:69ce12f60f55 52:461c7ba8286a
46 (define-key AT386-keypad-map "U" [next]) ;; PgDn 46 (define-key AT386-keypad-map "U" [next]) ;; PgDn
47 (define-key AT386-keypad-map "V" [prior]) ;; PgUp 47 (define-key AT386-keypad-map "V" [prior]) ;; PgUp
48 (define-key AT386-keypad-map "@" [insert]) ;; Ins key 48 (define-key AT386-keypad-map "@" [insert]) ;; Ins key
49 49
50 ;; These are not normally set up by either 50 ;; These are not normally set up by either
51 (define-key AT386-keypad-map "G" [kp_5]) ;; Unlabeled center key 51 (define-key AT386-keypad-map "G" [kp-5]) ;; Unlabeled center key
52 (define-key AT386-keypad-map "S" [kp_subtract]) 52 (define-key AT386-keypad-map "S" [kp-subtract])
53 (define-key AT386-keypad-map "T" [kp_add]) 53 (define-key AT386-keypad-map "T" [kp-add])
54 54
55 ;; Arrange for the ALT key to be equivalent to ESC 55 ;; Arrange for the ALT key to be equivalent to ESC
56 (define-key function-key-map "\eN" [?\e]) ; ALT map 56 (define-key function-key-map "\eN" [?\e]) ; ALT map
57 ) 57 )
58 58