diff options
| author | Pavel Janík | 2001-11-26 16:27:00 +0000 |
|---|---|---|
| committer | Pavel Janík | 2001-11-26 16:27:00 +0000 |
| commit | fa9f58dd20986fd4872bea37fc7a6a9c36baab8b (patch) | |
| tree | 3ca37ef1c194d2177cba7f189d66476f17756faf | |
| parent | eac9cf5f89e4ea470e06332f7266fa1e60a5154c (diff) | |
| download | emacs-fa9f58dd20986fd4872bea37fc7a6a9c36baab8b.tar.gz emacs-fa9f58dd20986fd4872bea37fc7a6a9c36baab8b.zip | |
(hexl-mode, hexl-follow-ascii): Remove make-local-hook.
| -rw-r--r-- | lisp/hexl.el | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/lisp/hexl.el b/lisp/hexl.el index 8883338a2e0..6a4408e4d4e 100644 --- a/lisp/hexl.el +++ b/lisp/hexl.el | |||
| @@ -254,10 +254,8 @@ You can use \\[hexl-find-file] to visit a file in Hexl mode. | |||
| 254 | (setq require-final-newline nil) | 254 | (setq require-final-newline nil) |
| 255 | 255 | ||
| 256 | ;; Add hooks to rehexlify or dehexlify on various events. | 256 | ;; Add hooks to rehexlify or dehexlify on various events. |
| 257 | (make-local-hook 'after-revert-hook) | ||
| 258 | (add-hook 'after-revert-hook 'hexl-after-revert-hook nil t) | 257 | (add-hook 'after-revert-hook 'hexl-after-revert-hook nil t) |
| 259 | 258 | ||
| 260 | (make-local-hook 'change-major-mode-hook) | ||
| 261 | (add-hook 'change-major-mode-hook 'hexl-maybe-dehexlify-buffer nil t) | 259 | (add-hook 'change-major-mode-hook 'hexl-maybe-dehexlify-buffer nil t) |
| 262 | 260 | ||
| 263 | (if hexl-follow-ascii (hexl-follow-ascii 1))) | 261 | (if hexl-follow-ascii (hexl-follow-ascii 1))) |
| @@ -835,8 +833,6 @@ Customize the variable `hexl-follow-ascii' to disable this feature." | |||
| 835 | (> (prefix-numeric-value arg) 0) | 833 | (> (prefix-numeric-value arg) 0) |
| 836 | (not hexl-ascii-overlay)))) | 834 | (not hexl-ascii-overlay)))) |
| 837 | 835 | ||
| 838 | (make-local-hook 'post-command-hook) | ||
| 839 | |||
| 840 | (if on-p | 836 | (if on-p |
| 841 | ;; turn it on | 837 | ;; turn it on |
| 842 | (if (not hexl-ascii-overlay) | 838 | (if (not hexl-ascii-overlay) |