Mercurial > hg > xemacs-beta

comparison lisp/prim/keydefs.el @ 153:25f70ba0133c r20-3b3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b3
author cvs
date Mon, 13 Aug 2007 09:38:25 +0200
parents 585fb297b004
children 43dd3413c7c7
comparison
equal deleted inserted replaced
152:4c132ee2d62b 153:25f70ba0133c
93 (define-key global-map "\C-a" 'beginning-of-line) 93 (define-key global-map "\C-a" 'beginning-of-line)
94 (define-key global-map "\C-b" 'backward-char) 94 (define-key global-map "\C-b" 'backward-char)
95 (define-key global-map "\C-e" 'end-of-line) 95 (define-key global-map "\C-e" 'end-of-line)
96 (define-key global-map "\C-f" 'forward-char) 96 (define-key global-map "\C-f" 'forward-char)
97 (define-key global-map "\C-d" 'delete-char) 97 (define-key global-map "\C-d" 'delete-char)
98 (define-key global-map "\177" 'delete-backward-char) 98 (define-key global-map "\177" 'backspace-or-delete)
99 99
100 ;; FSFmacs files.el 100 ;; FSFmacs files.el
101 101
102 (define-key global-map "\C-x\C-f" 'find-file) 102 (define-key global-map "\C-x\C-f" 'find-file)
103 (define-key global-map "\C-x\C-q" 'toggle-read-only) 103 (define-key global-map "\C-x\C-q" 'toggle-read-only)
369 369
370 (define-key global-map "\M-\C-l" 'switch-to-other-buffer) 370 (define-key global-map "\M-\C-l" 'switch-to-other-buffer)
371 371
372 ;; Default binding of "Backspace" is no longer the same as delete. 372 ;; Default binding of "Backspace" is no longer the same as delete.
373 ;; Default binding of "Control-h" is help. 373 ;; Default binding of "Control-h" is help.
374 (define-key global-map 'backspace "\C-?") 374 (define-key global-map 'backspace 'delete-backward-char)
375 (define-key global-map '(meta backspace) "\e\C-?") 375 (define-key global-map '(meta backspace) 'backward-kill-word)
376
377 376
378 (define-key global-map "\M-\C-z" 'activate-region) 377 (define-key global-map "\M-\C-z" 'activate-region)
379 378
380 ;; FSFmacs macros.c 379 ;; FSFmacs macros.c
381 380