Mercurial > hg > xemacs-beta

comparison lisp/prim/keydefs.el @ 140:585fb297b004 r20-2b4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-2b4
author cvs
date Mon, 13 Aug 2007 09:32:43 +0200
parents b980b6286996
children 25f70ba0133c
comparison
equal deleted inserted replaced
139:2b5203979d01 140:585fb297b004
367 (define-key global-map "\C-xae" 'expand-abbrev) 367 (define-key global-map "\C-xae" 'expand-abbrev)
368 (define-key global-map "\C-xa'" 'expand-abbrev) 368 (define-key global-map "\C-xa'" 'expand-abbrev)
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 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 '[delete]) 374 (define-key global-map 'backspace "\C-?")
375 (define-key global-map '(meta backspace) '[(meta delete)]) 375 (define-key global-map '(meta backspace) "\e\C-?")
376 (define-key global-map '(control backspace) '[(control delete)]) 376
377 (define-key global-map '(control meta backspace) '[(control meta delete)])
378 377
379 (define-key global-map "\M-\C-z" 'activate-region) 378 (define-key global-map "\M-\C-z" 'activate-region)
380 379
381 ;; FSFmacs macros.c 380 ;; FSFmacs macros.c
382 381