Mercurial > emacs
annotate etc/schema/xhtml-object.rnc @ 99977:b9e04d1588d7
(Vchar_unified_charset_table): Delete it.
(inhibit_load_charset_map): New variable.
(temp_charset_work): New variable.
(SET_TEMP_CHARSET_WORK_ENCODER, GET_TEMP_CHARSET_WORK_ENCODER)
(SET_TEMP_CHARSET_WORK_DECODER, GET_TEMP_CHARSET_WORK_DECODER):
New macros.
(load_charset_map): Meaning of control_flag changed. If
inhibit_load_charset_map is nonzero, setup a table in
temp_charset_work.
(load_charset): New argument control_flag.
(map_charset_for_dump): New function.
(map_charset_chars): If inhibit_load_charset_map is nonzero, use
map_charset_for_dump.
(Fdefine_charset_internal): If the charset method is MAP, load
mapping tables by calling load_charset.
(Funify_charset): Don't load a mapping table but directly set
Vchar_unify_table.
(maybe_unify_char): New function.
(decode_char): Don't handle the deleted method MAP_DEFERRED.
Handle the case of inhibit_load_charset_map being nonzero.
(encode_char): Don't handle the deleted method MAP_DEFERRED.
Handle the case of inhibit_load_charset_map being nonzero.
(Fclear_charset_maps): Just free temp_charset_work.
(syms_of_charset): Make `inhibit-load-charset-map' a Lisp
variable.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Thu, 27 Nov 2008 08:00:16 +0000 |
parents | 38f93f3d00a2 |
children |
rev | line source |
---|---|
86361 | 1 # Object Module |
2 | |
3 object = | |
4 element object { | |
5 object.attlist, | |
6 # No restrictions on mixed content in TREX. | |
7 param*, | |
8 Flow.model | |
9 } | |
10 object.attlist = | |
11 Common.attrib, | |
12 attribute declare { "declare" }?, | |
13 attribute classid { URI.datatype }?, | |
14 attribute codebase { URI.datatype }?, | |
15 attribute data { URI.datatype }?, | |
16 attribute type { ContentType.datatype }?, | |
17 attribute codetype { ContentType.datatype }?, | |
18 attribute archive { URIs.datatype }?, | |
19 attribute standby { Text.datatype }?, | |
20 attribute height { Length.datatype }?, | |
21 attribute width { Length.datatype }?, | |
22 attribute name { text }?, | |
23 attribute tabindex { Number.datatype }? | |
24 Inline.class |= object |