summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1996-01-29 23:16:11 +0000
committerKarl Heuer <kwzh@gnu.org>1996-01-29 23:16:11 +0000
commit55ed5fe34a032bff75fa553eae5d378e54de7a6a (patch)
tree86423cea3fe778fb8d27d018d5e36d1b21986658 /lisp
parent4c211b71c73bcd9029309a887b75fcf95fa38732 (diff)
downloademacs-55ed5fe34a032bff75fa553eae5d378e54de7a6a.tar.gz
(hexl-hex-char-to-integer, hexl-oct-char-to-integer): Fix error format string.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/hexl.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/hexl.el b/lisp/hexl.el
index 358b1f2ff39..ae071b68859 100644
--- a/lisp/hexl.el
+++ b/lisp/hexl.el
@@ -584,13 +584,13 @@ You may also type up to 3 octal digits, to insert a character with that code"
(let ((ch (logior character 32)))
(if (and (>= ch ?a) (<= ch ?f))
(- ch (- ?a 10))
- (error (format "Invalid hex digit `%c'." ch))))))
+ (error "Invalid hex digit `%c'." ch)))))
(defun hexl-oct-char-to-integer (character)
"Take a char and return its value as if it was a octal digit."
(if (and (>= character ?0) (<= character ?7))
(- character ?0)
- (error (format "Invalid octal digit `%c'." character))))
+ (error "Invalid octal digit `%c'." character)))
(defun hexl-printable-character (ch)
"Return a displayable string for character CH."