Mercurial > emacs
changeset 7380:96e1b1cd7c51
(hexl-mode-map): Add bindings for cursor keys.
| author | Karl Heuer <kwzh@gnu.org> |
|---|---|
| date | Sat, 07 May 1994 01:48:54 +0000 |
| parents | 822429149720 |
| children | 9e7dd6d12e1f |
| files | lisp/hexl.el |
| diffstat | 1 files changed, 9 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/hexl.el Sat May 07 01:42:48 1994 +0000 +++ b/lisp/hexl.el Sat May 07 01:48:54 1994 +0000 @@ -594,6 +594,15 @@ nil (setq hexl-mode-map (make-sparse-keymap)) + (define-key hexl-mode-map [left] 'hexl-backward-char) + (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 [next] 'hexl-scroll-up) + (define-key hexl-mode-map [prev] 'hexl-scroll-down) + (define-key hexl-mode-map "\C-a" 'hexl-beginning-of-line) (define-key hexl-mode-map "\C-b" 'hexl-backward-char) (define-key hexl-mode-map "\C-d" 'undefined)