initial checkin
[org.ibex.widgets.git] / src / org / ibex / theme / win2k / tab.t
1 <!-- Copyleft 2004 - see COPYING for details [LGPL] -->
2
3 <ibex xmlns="org.ibex.theme.win2k">
4     <meta:doc>
5         Author: Charles Goodwin
6     </meta:doc>
7
8     <ui:box redirect="$content" cols="1" padding="4 10">
9
10         selected ++= function(v) {
11             cascade = v;
12             $content.fill = selected ? "#d4d0c8" : "#c4c0b8";
13             $gap.height = selected ? 0 : 2;
14         }
15  
16         <ui:box id="gap" vshrink="true" />
17         <bevel form="tabtop">
18             <ui:box id="content" />
19         </bevel>
20
21     </ui:box>
22 </ibex>