MenuView.st
changeset 969 9e45deabf9e8
parent 967 6739eb5496da
child 1033 b747ae1b2705
--- a/MenuView.st	Wed Jan 22 18:25:17 1997 +0100
+++ b/MenuView.st	Thu Jan 23 02:37:16 1997 +0100
@@ -2234,6 +2234,8 @@
 !MenuView methodsFor:'queries'!
 
 preferredExtent 
+    "compute & return my preferredExtent from labels width's"
+
     |margin2 w h extra|
 
     "/ If I have an explicit preferredExtent ..
@@ -2261,7 +2263,7 @@
     ].
     ^ ((w+extra) @ h).
 
-    "Modified: 19.7.1996 / 20:44:56 / cg"
+    "Modified: 23.1.1997 / 02:36:17 / cg"
 !
 
 shortKeyInset
@@ -2613,5 +2615,5 @@
 !MenuView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.98 1997-01-22 17:21:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.99 1997-01-23 01:37:16 cg Exp $'
 ! !