Mercurial > emacs
comparison lisp/hexl.el @ 1978:d7fd2aa5185a
* hexl.el (hexl-mode-map): When initializing, remember that the
argument to key-binding is a key sequence, not a single key.
author | Jim Blandy <jimb@redhat.com> |
---|---|
date | Tue, 02 Mar 1993 07:26:43 +0000 |
parents | 9f3cc03dae67 |
children | 10e417efb12a |
comparison
equal
deleted
inserted
replaced
1977:ca6059bb1d6f | 1978:d7fd2aa5185a |
---|---|
584 (define-key hexl-mode-map "\C-b" 'hexl-backward-char) | 584 (define-key hexl-mode-map "\C-b" 'hexl-backward-char) |
585 (define-key hexl-mode-map "\C-d" 'undefined) | 585 (define-key hexl-mode-map "\C-d" 'undefined) |
586 (define-key hexl-mode-map "\C-e" 'hexl-end-of-line) | 586 (define-key hexl-mode-map "\C-e" 'hexl-end-of-line) |
587 (define-key hexl-mode-map "\C-f" 'hexl-forward-char) | 587 (define-key hexl-mode-map "\C-f" 'hexl-forward-char) |
588 | 588 |
589 (if (not (eq (key-binding help-char) 'help-command)) | 589 (if (not (eq (key-binding (char-to-string help-char)) 'help-command)) |
590 (define-key hexl-mode-map help-char 'undefined)) | 590 (define-key hexl-mode-map help-char 'undefined)) |
591 | 591 |
592 (define-key hexl-mode-map "\C-i" 'hexl-self-insert-command) | 592 (define-key hexl-mode-map "\C-i" 'hexl-self-insert-command) |
593 (define-key hexl-mode-map "\C-j" 'hexl-self-insert-command) | 593 (define-key hexl-mode-map "\C-j" 'hexl-self-insert-command) |
594 (define-key hexl-mode-map "\C-k" 'undefined) | 594 (define-key hexl-mode-map "\C-k" 'undefined) |