Mercurial > hg > xemacs-beta
comparison lisp/term/internal.el @ 371:cc15677e0335 r21-2b1
Import from CVS: tag r21-2b1
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:03:08 +0200 |
parents | a4f53d9b3154 |
children | 8626e4521993 |
comparison
equal
deleted
inserted
replaced
370:bd866891f083 | 371:cc15677e0335 |
---|---|
24 ;; screen setup -- that's easy! | 24 ;; screen setup -- that's easy! |
25 (standard-display-8bit 127 254) | 25 (standard-display-8bit 127 254) |
26 ;; --------------------------------------------------------------------------- | 26 ;; --------------------------------------------------------------------------- |
27 ;; keyboard setup -- that's simple! | 27 ;; keyboard setup -- that's simple! |
28 (set-input-mode nil nil 0) | 28 (set-input-mode nil nil 0) |
29 (define-key function-key-map [backspace] "\177") ; Normal behavior for BS | 29 (define-key function-key-map [backspace] "\177") ; Normal behaviour for BS |
30 (define-key function-key-map [delete] "\C-d") ; ... and Delete | 30 (define-key function-key-map [delete] "\C-d") ; ... and Delete |
31 (define-key function-key-map [tab] [?\t]) | 31 (define-key function-key-map [tab] [?\t]) |
32 (define-key function-key-map [linefeed] [?\n]) | 32 (define-key function-key-map [linefeed] [?\n]) |
33 (define-key function-key-map [clear] [11]) | 33 (define-key function-key-map [clear] [11]) |
34 (define-key function-key-map [return] [13]) | 34 (define-key function-key-map [return] [13]) |