Commit 4c1958f4 authored by Andreas Schwab's avatar Andreas Schwab

(Fcheck_coding_systems_region): Fix test for unibyte

string.
parent a057d86a
2009-02-16 Andreas Schwab <schwab@suse.de>
* coding.c (Fcheck_coding_systems_region): Fix test for unibyte
string.
2009-02-16 Kenichi Handa <handa@m17n.org> 2009-02-16 Kenichi Handa <handa@m17n.org>
* coding.c (Fcheck_coding_systems_region): Fix typo; Qt -> Qnil. * coding.c (Fcheck_coding_systems_region): Fix typo; Qt -> Qnil.
......
...@@ -8463,7 +8463,7 @@ START may be a string. In that case, check if the string is ...@@ -8463,7 +8463,7 @@ START may be a string. In that case, check if the string is
encodable, and the value contains indices to the string instead of encodable, and the value contains indices to the string instead of
buffer positions. END is ignored. buffer positions. END is ignored.
If the current buffer (or START if it is string) is unibyte, the value If the current buffer (or START if it is a string) is unibyte, the value
is nil. */) is nil. */)
(start, end, coding_system_list) (start, end, coding_system_list)
Lisp_Object start, end, coding_system_list; Lisp_Object start, end, coding_system_list;
...@@ -8478,7 +8478,7 @@ is nil. */) ...@@ -8478,7 +8478,7 @@ is nil. */)
if (STRINGP (start)) if (STRINGP (start))
{ {
if (!STRING_MULTIBYTE (start) if (!STRING_MULTIBYTE (start)
&& SCHARS (start) != SBYTES (start)) || SCHARS (start) == SBYTES (start))
return Qnil; return Qnil;
start_byte = 0; start_byte = 0;
end_byte = SBYTES (start); end_byte = SBYTES (start);
......
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