changeset 89261:86acab1ffbe2

(Fset_charset_priority): Update Viso_2022_charset_list.
author Kenichi Handa <handa@m17n.org>
date Wed, 30 Oct 2002 00:38:43 +0000
parents 1ca980f73ec5
children 17709000b5f0
files src/charset.c
diffstat 1 files changed, 9 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/charset.c	Tue Oct 29 12:14:44 2002 +0000
+++ b/src/charset.c	Wed Oct 30 00:38:43 2002 +0000
@@ -2007,6 +2007,15 @@
   arglist[1] = old_list;
   Vcharset_ordered_list = Fnconc (2, arglist);
   charset_ordered_list_tick++;
+
+  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))
+	new_head = Fcons (XCAR (old_list), new_head);
+    }
+  Viso_2022_charset_list = Fnreverse (new_head);
+
   return Qnil;
 }