diff options
| author | Richard M. Stallman | 1994-05-28 04:11:29 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-05-28 04:11:29 +0000 |
| commit | 7e17a6aade91bb0d90f39a17a987295e803501b4 (patch) | |
| tree | dcc14ac1d390a9a50698c5976fc865ea60718485 | |
| parent | 68a49b1802d9e6d3667b149876114c351b138f3a (diff) | |
| download | emacs-7e17a6aade91bb0d90f39a17a987295e803501b4.tar.gz emacs-7e17a6aade91bb0d90f39a17a987295e803501b4.zip | |
(hexl-mode-map): Call define-key properly for help-char.
| -rw-r--r-- | lisp/hexl.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/hexl.el b/lisp/hexl.el index 130a2573a14..f45540c599d 100644 --- a/lisp/hexl.el +++ b/lisp/hexl.el | |||
| @@ -614,7 +614,7 @@ You may also type up to 3 octal digits, to insert a character with that code" | |||
| 614 | (define-key hexl-mode-map "\C-f" 'hexl-forward-char) | 614 | (define-key hexl-mode-map "\C-f" 'hexl-forward-char) |
| 615 | 615 | ||
| 616 | (if (not (eq (key-binding (char-to-string help-char)) 'help-command)) | 616 | (if (not (eq (key-binding (char-to-string help-char)) 'help-command)) |
| 617 | (define-key hexl-mode-map help-char 'undefined)) | 617 | (define-key hexl-mode-map (char-to-string help-char) 'undefined)) |
| 618 | 618 | ||
| 619 | (define-key hexl-mode-map "\C-i" 'hexl-self-insert-command) | 619 | (define-key hexl-mode-map "\C-i" 'hexl-self-insert-command) |
| 620 | (define-key hexl-mode-map "\C-j" 'hexl-self-insert-command) | 620 | (define-key hexl-mode-map "\C-j" 'hexl-self-insert-command) |