diff options
author | Karl Heuer <kwzh@gnu.org> | 1996-01-04 23:40:30 +0000 |
---|---|---|
committer | Karl Heuer <kwzh@gnu.org> | 1996-01-04 23:40:30 +0000 |
commit | 5fd253c6d1c50bf24d59b781c601c037eb87cc77 (patch) | |
tree | a49b0f4b26380495877ea38b2eb3355fb4ca53dd | |
parent | b822f279b18120e18ac582c01ba0a78f87867a29 (diff) | |
download | emacs-5fd253c6d1c50bf24d59b781c601c037eb87cc77.tar.gz |
(hexl-program, hexl-beginning-of-1k-page,
hexl-end-of-1k-page, hexl-beginning-of-512b-page,
hexl-end-of-512b-page): Doc fix.
-rw-r--r-- | lisp/hexl.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/hexl.el b/lisp/hexl.el index 0af45a246f2..1ef4a0a4c5d 100644 --- a/lisp/hexl.el +++ b/lisp/hexl.el @@ -53,9 +53,9 @@ ;; (defvar hexl-program "hexl" - "The program that will hexlify and de-hexlify its stdin. + "The program that will hexlify and dehexlify its stdin. `hexl-program' will always be concatenated with `hexl-options' -and \"-de\" when dehexlfying a buffer.") +and \"-de\" when dehexlifying a buffer.") (defvar hexl-iso "" "If your emacs can handle ISO characters, this should be set to @@ -517,12 +517,12 @@ With prefix arg N, puts point N bytes of the way from the true beginning." (recenter 0)))) (defun hexl-beginning-of-1k-page () - "Goto to beginning of 1k boundry." + "Go to beginning of 1k boundary." (interactive) (hexl-goto-address (logand (hexl-current-address) -1024))) (defun hexl-end-of-1k-page () - "Goto to end of 1k boundry." + "Go to end of 1k boundary." (interactive) (hexl-goto-address (let ((address (logior (hexl-current-address) 1023))) (if (> address hexl-max-address) @@ -530,12 +530,12 @@ With prefix arg N, puts point N bytes of the way from the true beginning." address))) (defun hexl-beginning-of-512b-page () - "Goto to beginning of 512 byte boundry." + "Go to beginning of 512 byte boundary." (interactive) (hexl-goto-address (logand (hexl-current-address) -512))) (defun hexl-end-of-512b-page () - "Goto to end of 512 byte boundry." + "Go to end of 512 byte boundary." (interactive) (hexl-goto-address (let ((address (logior (hexl-current-address) 511))) (if (> address hexl-max-address) |