# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 1007038452 0
# Node ID 5aa97e5453991823288da6e201877cd57998d31e
# Parent  4c982f51020cdd56ec03d447fd1dc375ac9a08cc
(syms_of_coding) <Qchar_coding_system>: Give it an
extra extra slot.
(detect_coding_mask): Fix call of detect_coding_iso2022.

diff -r 4c982f51020c -r 5aa97e545399 src/coding.c
--- a/src/coding.c	Thu Nov 29 12:38:39 2001 +0000
+++ b/src/coding.c	Thu Nov 29 12:54:12 2001 +0000
@@ -4037,7 +4037,7 @@
 	      if (!iso2022_examined_p
 		  && (priorities[i] & try & CODING_CATEGORY_MASK_ISO))
 		{
-		  mask |= detect_coding_iso2022 (src, src_end);
+		  mask |= detect_coding_iso2022 (src, src_end, multibytep);
 		  iso2022_examined_p = 1;
 		}
 	      else if (priorities[i] & try & CODING_CATEGORY_MASK_SJIS)
@@ -7107,7 +7107,7 @@
      But don't staticpro it here--that is done in alloc.c.  */
   Qchar_table_extra_slots = intern ("char-table-extra-slots");
   Fput (Qsafe_chars, Qchar_table_extra_slots, make_number (0));
-  Fput (Qchar_coding_system, Qchar_table_extra_slots, make_number (1));
+  Fput (Qchar_coding_system, Qchar_table_extra_slots, make_number (2));
 
   Qvalid_codes = intern ("valid-codes");
   staticpro (&Qvalid_codes);
@@ -7226,7 +7226,8 @@
 If VAL is a cons of coding systems, the car part is used for decoding,
 and the cdr part is used for encoding.
 If VAL is a function symbol, the function must return a coding system
-or a cons of coding systems which are used as above.
+or a cons of coding systems which are used as above.  The function gets
+the arguments with which `find-operation-coding-systems' was called.
 
 See also the function `find-operation-coding-system'
 and the variable `auto-coding-alist'.  */);