--- a/MenuPanel.st	Wed Jan 28 07:09:01 2004 +0100
+++ b/MenuPanel.st	Fri Jan 30 00:00:18 2004 +0100
@@ -584,16 +584,14 @@
 
     |styleSheet style var foregroundColor backgroundColor buttonPassiveBackgroundColor
     buttonActiveLevel buttonPassiveLevel buttonEnteredLevel|
-"
-self updateStyleCache
-"
+
     MenuView            updateStyleCache.
     SelectionInListView updateStyleCache.
 
     styleSheet  := StyleSheet.
     style       := styleSheet name.
 
-    DefaultFont     := styleSheet at:#'menu.font'.
+    DefaultFont     := MenuView defaultFont.
     foregroundColor := styleSheet colorAt:#'pullDownMenu.foregroundColor' default:Color black.
     backgroundColor := self defaultBackgroundColor.
 
@@ -665,6 +663,10 @@
     styleSheet at:#'menuPanel.buttonEnteredBackgroundColor' put:var.
 
     Item updateStyleCache.
+
+    "
+     self updateStyleCache
+    "
 ! !
 
 !MenuPanel class methodsFor:'image registration'!
@@ -7428,7 +7430,7 @@
 !MenuPanel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.375 2004-01-14 08:38:32 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.376 2004-01-29 23:00:18 ca Exp $'
 ! !
 
 MenuPanel initialize!