Mercurial > emacs
comparison src/charset.c @ 91193:f93f0b835e32
(Fdefine_charset_internal): Record a supplementary
charset at the tail of Vcharset_order_list.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Thu, 06 Dec 2007 07:26:59 +0000 |
parents | f55f9811f5d7 |
children | 606f2d163a64 |
comparison
equal
deleted
inserted
replaced
91192:bcad98389aeb | 91193:f93f0b835e32 |
---|---|
1052 } | 1052 } |
1053 | 1053 |
1054 if (new_definition_p) | 1054 if (new_definition_p) |
1055 { | 1055 { |
1056 Vcharset_list = Fcons (args[charset_arg_name], Vcharset_list); | 1056 Vcharset_list = Fcons (args[charset_arg_name], Vcharset_list); |
1057 Vcharset_ordered_list = nconc2 (Vcharset_ordered_list, | 1057 if (charset.supplementary_p) |
1058 Fcons (make_number (id), Qnil)); | 1058 Vcharset_ordered_list = nconc2 (Vcharset_ordered_list, |
1059 Fcons (make_number (id), Qnil)); | |
1060 else | |
1061 Vcharset_ordered_list = Fcons (make_number (id), | |
1062 Vcharset_ordered_list); | |
1059 charset_ordered_list_tick++; | 1063 charset_ordered_list_tick++; |
1060 } | 1064 } |
1061 | 1065 |
1062 return Qnil; | 1066 return Qnil; |
1063 } | 1067 } |