--- a/MenuView.st Wed May 29 12:20:58 1996 +0200
+++ b/MenuView.st Wed May 29 12:24:15 1996 +0200
@@ -2140,6 +2140,10 @@
preferredExtent
|margin2 w h extra|
+ preferredExtent notNil ifTrue:[
+ ^ preferredExtent
+ ].
+
widthOfWidestLine := nil. "/ i.e. unknown
margin2 := margin * 2.
@@ -2159,7 +2163,7 @@
].
^ ((w+extra) @ h).
- "Modified: 2.3.1996 / 14:54:52 / cg"
+ "Modified: 29.5.1996 / 12:11:37 / cg"
!
shortKeyInset
@@ -2511,5 +2515,5 @@
!MenuView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.83 1996-05-28 19:19:13 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.84 1996-05-29 10:22:44 cg Exp $'
! !