summaryrefslogtreecommitdiff
path: root/lisp/hexl.el
diff options
context:
space:
mode:
authorPhillip Rulon <pjr@gnu.org>1999-10-09 01:19:36 +0000
committerPhillip Rulon <pjr@gnu.org>1999-10-09 01:19:36 +0000
commit330bd7c39b44338d31d6c72a0bca8c1b475cddb3 (patch)
tree72f2bd4abef69d8c2592fe0692e098a28830cd37 /lisp/hexl.el
parent62f1e1cd5997194fa774063ea79af8973caf85a1 (diff)
downloademacs-330bd7c39b44338d31d6c72a0bca8c1b475cddb3.tar.gz
* hexl.el (hexl-mode): Do nothing if already in hexl mode.
Diffstat (limited to 'lisp/hexl.el')
-rw-r--r--lisp/hexl.el12
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/hexl.el b/lisp/hexl.el
index 4a5d12c28e9..e5d55b43ca4 100644
--- a/lisp/hexl.el
+++ b/lisp/hexl.el
@@ -122,8 +122,10 @@ and \"-de\" when dehexlifying a buffer."
;;;###autoload
(defun hexl-mode (&optional arg)
- "\\<hexl-mode-map>
-A major mode for editing binary files in hex dump format.
+ "\\<hexl-mode-map>A mode for editing binary files in hex dump format.
+This is not an ordinary major mode; it alters some aspects
+if the current mode's behavior, but not all; also, you can exit
+Hexl mode and return to the previous mode using `hexl-mode-exit'.
This function automatically converts a buffer into the hexl format
using the function `hexlify-buffer'.
@@ -189,13 +191,11 @@ into the buffer at the current point.
Note: saving the file with any of the usual Emacs commands
will actually convert it back to binary format while saving.
-You can use \\[hexl-find-file] to visit a file in hexl-mode.
+You can use \\[hexl-find-file] to visit a file in Hexl mode.
\\[describe-bindings] for advanced commands."
(interactive "p")
- (if (eq major-mode 'hexl-mode)
- (error "You are already in hexl mode")
-
+ (unless (eq major-mode 'hexl-mode)
(let ((modified (buffer-modified-p))
(inhibit-read-only t)
(original-point (1- (point)))