From: Kenichi Handa <handa@m17n.org>
Date: Mon, 16 Feb 2009 11:53:52 +0000 (+0000)
Subject: (Fcheck_coding_systems_region): Fix typo; Qt -> Qnil.
X-Git-Tag: emacs-pretest-23.0.91~196
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5704f39a803314e9f5d621fa98de283465efb54e;p=emacs.git

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

diff --git a/src/ChangeLog b/src/ChangeLog
index 033112cfeb6..d916319e3d8 100644
--- 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 abc7b3eca76..bd8c19f374a 100644
--- 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)
 	{