9 Jul
2014
9 Jul
'14
12:03 p.m.
Spec-Examples-Morphic TabContainerMorph
initialize
super initialize.
self changeProportionalLayout.
container := PanelMorph new
changeTableLayout;
listDirection: #bottomToTop;
color: Color white;
yourself.
tab := PluggableTabBarMorph on: self.
tab width: 150.
tab color: Color white darker darker.
self addAll.