Mercurial > emacs
changeset 5819:b047e246c13d
(hexl-mode-exit): Bind inhibit-read-only; don't alter buffer-read-only.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Mon, 07 Feb 1994 05:43:51 +0000 |
| parents | bdda7582b8cd |
| children | 3443820118a0 |
| files | lisp/hexl.el |
| diffstat | 1 files changed, 1 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/hexl.el Mon Feb 07 05:42:40 1994 +0000 +++ b/lisp/hexl.el Mon Feb 07 05:43:51 1994 +0000 @@ -229,13 +229,11 @@ (interactive "p") (if (or (eq arg 1) (not arg)) (let ((modified (buffer-modified-p)) - (read-only buffer-read-only) + (inhibit-read-only t) (original-point (1+ (hexl-current-address)))) - (setq buffer-read-only nil) (dehexlify-buffer) (remove-hook 'write-contents-hook 'hexl-save-buffer) (set-buffer-modified-p modified) - (setq buffer-read-only read-only) (goto-char original-point))) (setq mode-name hexl-mode-old-mode-name) (use-local-map hexl-mode-old-local-map)