Mercurial > hg > xemacs-beta
changeset 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 | 5d09ddada9ae |
children | ee2d33cfc3c1 |
files | lisp/ChangeLog lisp/keydefs.el lisp/msw-init.el |
diffstat | 3 files changed, 10 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Thu May 09 07:16:38 2002 +0000 +++ b/lisp/ChangeLog Thu May 09 08:33:46 2002 +0000 @@ -1,3 +1,11 @@ +2002-05-09 Ben Wing <ben@xemacs.org> + + * keydefs.el (global-map): New. + * msw-init.el (init-post-mswindows-win): + 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. + 2002-04-14 Golubev I. N. <gin@mo.msk.ru> * info.el (Info-find-index-alternatives): fix missing \ in \t.
--- a/lisp/keydefs.el Thu May 09 07:16:38 2002 +0000 +++ b/lisp/keydefs.el Thu May 09 08:33:46 2002 +0000 @@ -614,10 +614,12 @@ ;; the infamous delete key (define-key global-map 'delete 'backward-or-forward-delete-char) +(define-key global-map '(control delete) 'backward-or-forward-kill-word) (define-key global-map '(meta delete) 'backward-or-forward-kill-word) (define-key global-map [(control x) (delete)] 'backward-or-forward-kill-sentence) (define-key global-map 'kp-delete 'backward-or-forward-delete-char) +(define-key global-map '(control kp-delete) 'backward-or-forward-kill-word) (define-key global-map '(meta kp-delete) 'backward-or-forward-kill-word) (define-key global-map [(control x) (kp-delete)] 'backward-or-forward-kill-sentence)
--- a/lisp/msw-init.el Thu May 09 07:16:38 2002 +0000 +++ b/lisp/msw-init.el Thu May 09 08:33:46 2002 +0000 @@ -46,7 +46,6 @@ ;; Old-style mswindows bindings. The new-style mswindows bindings ;; (namely Ctrl-X, Ctrl-C and Ctrl-V) are already spoken for by XEmacs. (global-set-key '(shift delete) 'kill-primary-selection) - (global-set-key '(control delete) 'delete-primary-selection) (global-set-key '(shift insert) 'yank-clipboard-selection) (global-set-key '(control insert) 'copy-primary-selection)