*** empty log message ***

[gnu-emacs] / lisp / hexl.el

diff --git a/lisp/hexl.el b/lisp/hexl.el
index 3a7498c83171d670804abe2cc8afd0101da9a4d9..8671413e81ada61383322d41528a5d4b3f43e323 100644 (file)
--- a/lisp/hexl.el
+++ b/lisp/hexl.el
@@ -42,9 +42,9 @@
 ;;
 
 (defvar hexl-program "hexl"
-  "The program that will hexlify and de-hexlify its stdin.  hexl-program
-will always be concated with hexl-options and "-de" when dehexlfying a
-buffer.")
+  "The program that will hexlify and de-hexlify its stdin.
+`hexl-program' will always be concated with `hexl-options'
+and \"-de\" when dehexlfying a buffer.")
 
 (defvar hexl-iso ""
   "If your emacs can handle ISO characters, this should be set to
@@ -75,7 +75,7 @@ A major mode for editting binary files in hex dump format.
 This function automatically converts a buffer into the hexl format
 using the function `hexlify-buffer'.
 
-Each line in the buffer has an `address' (displayed in hexadecimal)
+Each line in the buffer has an \"address\" (displayed in hexadecimal)
 representing the offset into the file that the characters on this line
 are at and 16 characters from the file (displayed as hexadecimal
 values grouped every 16 bits) and as their ASCII values.
@@ -84,8 +84,8 @@ If any of the characters (displayed as ASCII characters) are
 unprintable (control or meta characters) they will be replaced as
 periods.
 
-If hexl-mode is invoked with an argument the buffer is assumed to be
-in hexl-format.
+If `hexl-mode' is invoked with an argument the buffer is assumed to be
+in hexl format.
 
 A sample format:
 
@@ -195,7 +195,6 @@ You can use \\[hexl-find-file] to visit a file in hexl-mode.
 
 (defun hexl-find-file (filename)
   "Edit file FILENAME in hexl-mode.
-
 Switch to a buffer visiting file FILENAME, creating one in none exists."
   (interactive "fFilename: ")
   (find-file filename)
@@ -246,7 +245,7 @@ Signal error if ADDRESS out of range."
   (goto-char (hexl-address-to-marker address)))
 
 (defun hexl-goto-hex-address (hex-address)
-  "Goto hexl-mode address (hex string) HEX-ADDRESS.
+  "Go to hexl-mode address (hex string) HEX-ADDRESS.
 
 Signal error if HEX-ADDRESS is out of range."
   (interactive "sHex Address: ")
@@ -364,20 +363,14 @@ Signal error if HEX-ADDRESS is out of range."
   (hexl-backward-word (- arg)))
 
 (defun hexl-previous-line (arg)
-  "Move vertically up ARG lines [16 bytes] (down if ARG negative) in
-hexl-mode.
-
-If there is byte at the target address move to the last byte in that
-line."
+  "Move vertically up ARG lines [16 bytes] (down if ARG negative) in hexl-mode.
+If there is byte at the target address move to the last byte in that line."
   (interactive "p")
   (hexl-next-line (- arg)))
 
 (defun hexl-next-line (arg)
-  "Move vertically down ARG lines [16 bytes] (up if ARG negative) in
-hexl-mode.
-
-If there is no byte at the target address move to the last byte in that
-line."
+  "Move vertically down ARG lines [16 bytes] (up if ARG negative) in hexl-mode.
+If there is no byte at the target address move to the last byte in that line."
   (interactive "p")
   (hexl-goto-address (let ((address (+ (hexl-current-address) (* arg 16)) t))
                       (if (and (< arg 0) (< address 0))
@@ -396,16 +389,15 @@ line."
                       address)))
 
 (defun hexl-beginning-of-buffer (arg)
-  "Move to the beginning of the hexl buffer; leave hexl-mark at previous
-posistion.
-
-With arg N, put point N bytes of the way from the true beginning."
+  "Move to the beginning of the hexl buffer.
+Leaves `hexl-mark' at previous position.
+With prefix arg N, puts point N bytes of the way from the true beginning."
   (interactive "p")
   (push-mark (point))
   (hexl-goto-address (+ 0 (1- arg))))
 
 (defun hexl-end-of-buffer (arg)
-  "Goto hexl-max-address minus ARG."
+  "Go to `hexl-max-address' minus ARG."
   (interactive "p")
   (push-mark (point))
   (hexl-goto-address (- hexl-max-address (1- arg))))
@@ -631,7 +623,6 @@ You may also type up to 3 octal digits, to insert a character with that code"
     (define-key hexl-mode-map "\e\C-x" 'hexl-insert-hex-char)
     (define-key hexl-mode-map "\e\C-y" 'undefined)
 
-
     (define-key hexl-mode-map "\ea" 'hexl-beginning-of-1k-page)
     (define-key hexl-mode-map "\eb" 'hexl-backward-word)
     (define-key hexl-mode-map "\ec" 'undefined)