--- a/MenuPanel.st Mon Jan 29 16:09:27 2001 +0100
+++ b/MenuPanel.st Tue Jan 30 19:49:20 2001 +0100
@@ -3313,7 +3313,6 @@
lvl := styleSheet at:#'popup.level' default:0.
] ifFalse:[
bw := styleSheet is3D ifFalse:[1] ifTrue:[0].
- lvl := 1.
].
self borderWidth:bw.
self level:lvl.
@@ -3375,6 +3374,8 @@
groupDividerSize := DefaultGroupDividerSize.
fitFirstPanel := false.
font := MenuView defaultFont onDevice:device.
+
+ super level:(styleSheet is3D ifTrue:[1] ifFalse:[0]).
!
initialize
@@ -3390,8 +3391,6 @@
explicitExtent := nil.
shortKeyInset := 0.
mustRearrange := false.
-
- "Modified: / 2.3.2000 / 21:50:46 / cg"
!
map
@@ -6238,6 +6237,6 @@
!MenuPanel class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.262 2001-01-29 15:09:27 ca Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.263 2001-01-30 18:49:20 ca Exp $'
! !
MenuPanel initialize!