Mercurial > hg > xemacs-beta

comparison lisp/term/internal.el @ 380:8626e4521993 r21-2-5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-5
author cvs
date Mon, 13 Aug 2007 11:07:10 +0200
parents cc15677e0335
children
comparison
equal deleted inserted replaced
379:76b7d63099ad 380:8626e4521993
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])