Mercurial > emacs
annotate etc/schema/xhtml-frames.rnc @ 111998:bc8dc4ac1e28
Implement tool-bar separators for non-GTK tool-bars.
* lisp/tool-bar.el (tool-bar--image-expression): New function.
(tool-bar-local-item, tool-bar--image-exp): Use it.
(tool-bar-setup): Initialize tool-bar-separator-image-expression.
Use :enable instead of :visible to avoid changing the tool-bar
configuration unnecessarily.
* src/keyboard.c (Vtool_bar_separator_image_expression): New variable.
(parse_tool_bar_item): Use it to obtain image separators for
displays not using native tool-bar separators.
* src/xdisp.c (build_desired_tool_bar_string): Don't handle separators
specially, since this is now done in parse_tool_bar_item.
* lisp/info.el (info-tool-bar-map): Add separators.
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Mon, 20 Dec 2010 08:17:26 +0800 |
parents | 38f93f3d00a2 |
children |
rev | line source |
---|---|
86361 | 1 # Frames Module |
2 | |
3 include "xhtml-struct.rnc" { | |
4 html = element html { html.attlist, head, frameset } | |
5 } | |
6 frameset = | |
7 element frameset { | |
8 frameset.attlist, | |
9 ((frameset | frame)+ & noframes?) | |
10 } | |
11 frameset.attlist = | |
12 Core.attrib, | |
13 attribute cols { MultiLength.datatype }?, | |
14 attribute rows { MultiLength.datatype }? | |
15 frame = element frame { frame.attlist } | |
16 frame.attlist = | |
17 Core.attrib, | |
18 attribute longdesc { URI.datatype }?, | |
19 attribute src { URI.datatype }?, | |
20 attribute frameborder { "1" | "0" }?, | |
21 attribute marginwidth { Pixels.datatype }?, | |
22 attribute marginheight { Pixels.datatype }?, | |
23 attribute noresize { "noresize" }?, | |
24 attribute scrolling { "yes" | "no" | "auto" }? | |
25 noframes = element noframes { noframes.attlist, body } | |
26 noframes.attlist = Common.attrib |