mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-18 02:47:36 +00:00
(hexl-mode-map): Add bindings for cursor keys.
This commit is contained in:
parent
e945e87d7f
commit
f86f73c33d
1 changed files with 9 additions and 0 deletions
|
|
@ -594,6 +594,15 @@ You may also type up to 3 octal digits, to insert a character with that code"
|
|||
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)
|
||||
|
|
|
|||
Loading…
Reference in a new issue