# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1035939405 0
# Node ID 208b5b32e08cbf2ad1b03ea27a3770b121c38386
# Parent  17709000b5f0f7b439cb1c5dac162c129cb07c3e
(Fset_charset_priority): Fix previous change.

diff -r 17709000b5f0 -r 208b5b32e08c src/charset.c
--- a/src/charset.c	Wed Oct 30 00:43:11 2002 +0000
+++ b/src/charset.c	Wed Oct 30 00:56:45 2002 +0000
@@ -2011,7 +2011,7 @@
   for (old_list = Vcharset_ordered_list, new_head = Qnil;
        CONSP (old_list); old_list = XCDR (old_list))
     {
-      if (Fmemq (XCAR (old_list), Viso_2022_charset_list))
+      if (! NILP (Fmemq (XCAR (old_list), Viso_2022_charset_list)))
 	new_head = Fcons (XCAR (old_list), new_head);
     }
   Viso_2022_charset_list = Fnreverse (new_head);