(Ffind_coding_systems_region_internal): Detect an

ASCII only string correctly.

diff --git a/src/ChangeLog b/src/ChangeLog
index 9458017fcd7dfee99b6e08f39a8dc5b8b8dbc461..faf1211723756fb5222aeda337a257e787550ae7 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,8 @@
 2002-07-25  Kenichi Handa  <handa@etl.go.jp>
 
+       * coding.c (Ffind_coding_systems_region_internal): Detect an
+       ASCII only string correctly.
+
        * lread.c (Fload): Don't load with Qload_force_doc_strings t if
        version is 0.
 

diff --git a/src/coding.c b/src/coding.c
index c307b2aca2530bc1b3afcd5f651b9ff279d19226..e19319abb2c4a728d820b77363008d6d5dc4f306 100644 (file)
--- a/src/coding.c
+++ b/src/coding.c
@@ -6438,7 +6438,7 @@ char_encodable_p (c, attrs)
 /* Return a list of coding systems that safely encode the text between
    START and END.  If EXCLUDE is non-nil, it is a list of coding
    systems not to check.  The returned list doesn't contain any such
-   coding systems.  In any case, If the text contains only ASCII or is
+   coding systems.  In any case, if the text contains only ASCII or is
    unibyte, return t.  */
 
 DEFUN ("find-coding-systems-region-internal",
@@ -6457,7 +6457,7 @@ DEFUN ("find-coding-systems-region-internal",
   if (STRINGP (start))
     {
       if (!STRING_MULTIBYTE (start)
-         && XSTRING (start)->size != STRING_BYTES (XSTRING (start)))
+         || XSTRING (start)->size == STRING_BYTES (XSTRING (start)))
        return Qt;
       start_byte = 0;
       end_byte = STRING_BYTES (XSTRING (start));