Mercurial > hg > xemacs-beta

comparison lisp/term/internal.el @ 367:a4f53d9b3154 r21-1-13

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-1-13
author cvs
date Mon, 13 Aug 2007 11:01:07 +0200
parents 376386a54a3c
children cc15677e0335
comparison
equal deleted inserted replaced
366:83d76f480a59 367:a4f53d9b3154
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 behaviour for BS 29 (define-key function-key-map [backspace] "\177") ; Normal behavior 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])