(Fcheck_coding_systems_region): Fix typo; Qt -> Qnil.

diff --git a/src/ChangeLog b/src/ChangeLog
index 033112cfeb6fc5311f1776be0876ce011132a498..d916319e3d87e4b3aaf42d79e413942bba7a6abd 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2009-02-16  Kenichi Handa  <handa@m17n.org>
+
+       * coding.c (Fcheck_coding_systems_region): Fix typo; Qt -> Qnil.
+
 2009-02-14  Chong Yidong  <cyd@stupidchicken.com>
 
        * dispextern.h (struct iterator_stack_entry): New line_wrap

diff --git a/src/coding.c b/src/coding.c
index abc7b3eca761bb8a0a54a1d390ac31ecd2ca1316..bd8c19f374a9d205fb2c17783ced813fb90de1c7 100644 (file)
--- a/src/coding.c
+++ b/src/coding.c
@@ -8461,7 +8461,10 @@ value is nil.
 
 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.  */)
+buffer positions.  END is ignored.
+
+If the current buffer (or START if it is string) is unibyte, the value
+is nil.  */)
      (start, end, coding_system_list)
      Lisp_Object start, end, coding_system_list;
 {
@@ -8492,7 +8495,7 @@ buffer positions.  END is ignored.  */)
       start_byte = CHAR_TO_BYTE (XINT (start));
       end_byte = CHAR_TO_BYTE (XINT (end));
       if (XINT (end) - XINT (start) == end_byte - start_byte)
-       return Qt;
+       return Qnil;
 
       if (XINT (start) < GPT && XINT (end) > GPT)
        {