mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-24 06:20:43 -08:00
Code Issues Projects Releases Wiki Activity

(Fcheck_coding_systems_region): Fix test for unibyte

Browse source 
string.
This commit is contained in:
Andreas Schwab 2009-02-16 13:04:15 +00:00
parent a057d86ade
commit 4c1958f4a9
2 changed files with 7 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/coding.c
View file

@ -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
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. */)
(start, end, coding_system_list)
Lisp_Object start, end, coding_system_list;
@ -8478,7 +8478,7 @@ is nil. */)
if (STRINGP (start))
{
if (!STRING_MULTIBYTE (start)
&& SCHARS (start) != SBYTES (start))
|| SCHARS (start) == SBYTES (start))
return Qnil;
start_byte = 0;
end_byte = SBYTES (start);