# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1082575023 0
# Node ID e703f6cf2d7fa530b7d3b2a170a54f352ea18b9a
# Parent  428f891f9e31ad17d6c529ae425190fd0a2470ba
(ctext-post-read-conversion): Use assoc-string, not assoc-ignore-case.

diff -r 428f891f9e31 -r e703f6cf2d7f lisp/international/mule.el
--- a/lisp/international/mule.el	Wed Apr 21 19:16:15 2004 +0000
+++ b/lisp/international/mule.el	Wed Apr 21 19:17:03 2004 +0000
@@ -1401,9 +1401,9 @@
 	      (let* ((M (char-after (+ pos 4)))
 		     (L (char-after (+ pos 5)))
 		     (encoding (match-string 2))
-		     (encoding-info (assoc-ignore-case 
+		     (encoding-info (assoc-string 
 				     encoding
-				     ctext-non-standard-encodings-alist))
+				     ctext-non-standard-encodings-alist t))
 		     (coding (if encoding-info
 				 (nth 1 encoding-info)
 			       (setq encoding (intern (downcase encoding)))