Mercurial > hg > xemacs-beta
diff lisp/prim/keydefs.el @ 157:6b37e6ddd302 r20-3b5
Import from CVS: tag r20-3b5
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:40:41 +0200 |
parents | 43dd3413c7c7 |
children | 3bb7ccffb0c0 |
line wrap: on
line diff
--- a/lisp/prim/keydefs.el Mon Aug 13 09:39:46 2007 +0200 +++ b/lisp/prim/keydefs.el Mon Aug 13 09:40:41 2007 +0200 @@ -95,7 +95,7 @@ (define-key global-map "\C-e" 'end-of-line) (define-key global-map "\C-f" 'forward-char) (define-key global-map "\C-d" 'delete-char) -(define-key global-map "\177" 'backspace-or-delete) +(define-key global-map 'delete 'backspace-or-delete) ;; FSFmacs files.el @@ -271,7 +271,7 @@ (define-key global-map "\M-f" 'forward-word) (define-key global-map "\M-b" 'backward-word) (define-key global-map "\M-d" 'kill-word) -(define-key global-map "\M-\177" 'backward-kill-word) +;;(define-key global-map "\M-\177" 'backward-kill-word) (define-key global-map "\M-<" 'beginning-of-buffer) (define-key global-map "\M->" 'end-of-buffer) @@ -337,7 +337,7 @@ (define-key global-map "\M-a" 'backward-sentence) (define-key global-map "\M-e" 'forward-sentence) (define-key global-map "\M-k" 'kill-sentence) -(define-key global-map "\C-x\177" 'backward-kill-sentence) +;;(define-key global-map "\C-x\177" 'backward-kill-sentence) (define-key global-map "\C-x[" 'backward-page) (define-key global-map "\C-x]" 'forward-page)