changeset 38391:6e498054580e

(Ffind_coding_systems_region_internal): If safe_codings is t, don't try to append anything to it.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Thu, 12 Jul 2001 20:26:18 +0000
parents 44b779e58de6
children 5b7951bd8471
files src/coding.c
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/coding.c	Thu Jul 12 16:29:51 2001 +0000
+++ b/src/coding.c	Thu Jul 12 20:26:18 2001 +0000
@@ -6409,7 +6409,9 @@
     safe_codings = find_safe_codings (p2, p2end, safe_codings, work_table,
 				      &single_byte_char_found);
 
-  if (!single_byte_char_found)
+  if (EQ (safe_codings, Qt))
+    ; /* Nothing to be done.  */
+  else if (!single_byte_char_found)
     {
       /* Append generic coding systems.  */
       Lisp_Object args[2];