--- a/MenuPanel.st	Sat Aug 08 13:49:06 1998 +0200
+++ b/MenuPanel.st	Mon Aug 10 13:29:27 1998 +0200
@@ -3277,7 +3277,7 @@
 
     (subMenu := aSubMenu) notNil ifTrue:[
         aSubMenu class == Menu ifTrue:[
-            subMenu := menuPanel class new.
+            subMenu := MenuPanel new.
             menuPanel notNil ifTrue:[
                 subMenu receiver:menuPanel receiver.
             ].
@@ -3288,7 +3288,7 @@
         ]
     ].
 
-    "Modified: / 8.8.1998 / 02:14:50 / cg"
+    "Modified: / 10.8.1998 / 13:26:28 / cg"
 !
 
 textLabel
@@ -4741,6 +4741,6 @@
 !MenuPanel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.107 1998-08-08 11:39:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.108 1998-08-10 11:29:27 cg Exp $'
 ! !
 MenuPanel initialize!