--- a/MenuPanel.st	Wed Jun 04 15:45:19 1997 +0200
+++ b/MenuPanel.st	Wed Jun 04 16:04:01 1997 +0200
@@ -2398,6 +2398,14 @@
   ^ self verticalLayout
 
 
+!
+
+type
+    "return the views type. This is one of #normal,
+     #master, #slave or #partner."
+
+    ^ #slave
+
 ! !
 
 !MenuPanel methodsFor:'selection'!
@@ -3612,6 +3620,6 @@
 !MenuPanel class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.7 1997-06-04 11:09:34 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/MenuPanel.st,v 1.8 1997-06-04 14:04:01 ca Exp $'
 ! !
 MenuPanel initialize!