comparison lisp/keydefs.el @ 832:f3244b2b4053

[xemacs-hg @ 2002-05-09 08:33:45 by ben] key def changes keydefs.el, msw-init.el: ctrl-delete is like M-d, in keeping with PC standards. it still will function at its original (delete-selection), when there's a selection, with the new associated pending-del patch.
author ben
date Thu, 09 May 2002 08:33:46 +0000
parents a634e3b7acc8
children 75469d7df0a9
comparison
equal deleted inserted replaced
831:5d09ddada9ae 832:f3244b2b4053
612 (global-set-key '(meta kp-home) 'switch-to-previous-buffer) 612 (global-set-key '(meta kp-home) 'switch-to-previous-buffer)
613 (global-set-key '(meta kp-end) 'switch-to-next-buffer) 613 (global-set-key '(meta kp-end) 'switch-to-next-buffer)
614 614
615 ;; the infamous delete key 615 ;; the infamous delete key
616 (define-key global-map 'delete 'backward-or-forward-delete-char) 616 (define-key global-map 'delete 'backward-or-forward-delete-char)
617 (define-key global-map '(control delete) 'backward-or-forward-kill-word)
617 (define-key global-map '(meta delete) 'backward-or-forward-kill-word) 618 (define-key global-map '(meta delete) 'backward-or-forward-kill-word)
618 (define-key global-map [(control x) (delete)] 619 (define-key global-map [(control x) (delete)]
619 'backward-or-forward-kill-sentence) 620 'backward-or-forward-kill-sentence)
620 (define-key global-map 'kp-delete 'backward-or-forward-delete-char) 621 (define-key global-map 'kp-delete 'backward-or-forward-delete-char)
622 (define-key global-map '(control kp-delete) 'backward-or-forward-kill-word)
621 (define-key global-map '(meta kp-delete) 'backward-or-forward-kill-word) 623 (define-key global-map '(meta kp-delete) 'backward-or-forward-kill-word)
622 (define-key global-map [(control x) (kp-delete)] 624 (define-key global-map [(control x) (kp-delete)]
623 'backward-or-forward-kill-sentence) 625 'backward-or-forward-kill-sentence)
624 626
625 ;; don't try this one at home, kids. 627 ;; don't try this one at home, kids.