Commit 447a052b authored by Kenichi Handa's avatar Kenichi Handa
Browse files

(byte-compile-fix-header): Fix the way of checking the existence of

any multibyte characters.
parent 24d55b8f
......@@ -1522,10 +1522,8 @@ With argument, insert value in current buffer after the form."
(defun byte-compile-fix-header (filename inbuffer outbuffer)
(save-excursion
(set-buffer outbuffer)
(goto-char (point-min))
;; See if the buffer has any multibyte characters.
(skip-chars-forward "\0-\377")
(when (not (eobp))
(when (< (point-max) (position-bytes (point-max)))
(when (byte-compile-version-cond byte-compile-compatibility)
(error "Version-18 compatibility not valid with multibyte characters"))
(goto-char (point-min))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment