Mercurial > hg > xemacs-beta
diff lisp/packages/hexl.el @ 70:131b0175ea99 r20-0b30
Import from CVS: tag r20-0b30
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:02:59 +0200 |
parents | bcdc7deadc19 |
children | b9518feda344 |
line wrap: on
line diff
--- a/lisp/packages/hexl.el Mon Aug 13 09:00:04 2007 +0200 +++ b/lisp/packages/hexl.el Mon Aug 13 09:02:59 2007 +0200 @@ -689,15 +689,15 @@ (define-key hexl-mode-map [right] 'hexl-forward-char) (define-key hexl-mode-map [up] 'hexl-previous-line) (define-key hexl-mode-map [down] 'hexl-next-line) - (define-key hexl-mode-map [(meta left)] 'hexl-backward-short) - (define-key hexl-mode-map [(meta right)] 'hexl-forward-short) + (define-key hexl-mode-map [M-left] 'hexl-backward-short) + (define-key hexl-mode-map [M-right] 'hexl-forward-short) (define-key hexl-mode-map [next] 'hexl-scroll-up) (define-key hexl-mode-map [prior] 'hexl-scroll-down) (define-key hexl-mode-map [home] 'hexl-beginning-of-buffer) (define-key hexl-mode-map [deletechar] 'undefined) (define-key hexl-mode-map [deleteline] 'undefined) (define-key hexl-mode-map [insertline] 'undefined) - (define-key hexl-mode-map [(shift delete)] 'undefined) + (define-key hexl-mode-map [S-delete] 'undefined) (define-key hexl-mode-map "\177" 'undefined) (define-key hexl-mode-map "\C-a" 'hexl-beginning-of-line)