Mercurial > hg > xemacs-beta
diff lisp/packages/hexl.el @ 12:bcdc7deadc19 r19-15b7
Import from CVS: tag r19-15b7
| author | cvs |
|---|---|
| date | Mon, 13 Aug 2007 08:48:16 +0200 |
| parents | ac2d302a0011 |
| children | 131b0175ea99 |
line wrap: on
line diff
--- a/lisp/packages/hexl.el Mon Aug 13 08:47:56 2007 +0200 +++ b/lisp/packages/hexl.el Mon Aug 13 08:48:16 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 [M-left] 'hexl-backward-short) - (define-key hexl-mode-map [M-right] 'hexl-forward-short) + (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 [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 [S-delete] 'undefined) + (define-key hexl-mode-map [(shift delete)] 'undefined) (define-key hexl-mode-map "\177" 'undefined) (define-key hexl-mode-map "\C-a" 'hexl-beginning-of-line)