aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/hexl.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/hexl.el b/lisp/hexl.el
index a4e9792dc6b..413344fc375 100644
--- a/lisp/hexl.el
+++ b/lisp/hexl.el
@@ -1,6 +1,6 @@
1;;; hexl.el --- edit a file in a hex dump format using the hexl filter 1;;; hexl.el --- edit a file in a hex dump format using the hexl filter
2 2
3;; Copyright (C) 1989, 1994, 1998, 2001, 2002, 2003 Free Software Foundation, Inc. 3;; Copyright (C) 1989, 1994, 1998, 2001, 2002, 2003, 2004 Free Software Foundation, Inc.
4 4
5;; Author: Keith Gabryelski <ag@wheaties.ai.mit.edu> 5;; Author: Keith Gabryelski <ag@wheaties.ai.mit.edu>
6;; Maintainer: FSF 6;; Maintainer: FSF
@@ -742,7 +742,7 @@ and their encoded form is inserted byte by byte."
742 742
743CH must be a unibyte character whose value is between 0 and 255." 743CH must be a unibyte character whose value is between 0 and 255."
744 (if (or (< ch 0) (> ch 255)) 744 (if (or (< ch 0) (> ch 255))
745 (error "Invalid character 0x%x -- must be in the range [0..255]")) 745 (error "Invalid character 0x%x -- must be in the range [0..255]" ch))
746 (let ((address (hexl-current-address t))) 746 (let ((address (hexl-current-address t)))
747 (while (> num 0) 747 (while (> num 0)
748 (let ((hex-position 748 (let ((hex-position