MenuView.st
changeset 799 64f8700489a4
parent 774 b4bde280d528
child 831 8af010be0a02
--- a/MenuView.st	Fri Jul 19 20:53:39 1996 +0200
+++ b/MenuView.st	Fri Jul 19 20:57:13 1996 +0200
@@ -2171,6 +2171,8 @@
 preferredExtent 
     |margin2 w h extra|
 
+    "/ If I have an explicit preferredExtent ..
+
     preferredExtent notNil ifTrue:[
         ^ preferredExtent
     ].
@@ -2194,7 +2196,7 @@
     ].
     ^ ((w+extra) @ h).
 
-    "Modified: 29.5.1996 / 12:11:37 / cg"
+    "Modified: 19.7.1996 / 20:44:56 / cg"
 !
 
 shortKeyInset
@@ -2546,5 +2548,5 @@
 !MenuView  class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.89 1996-07-05 09:44:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/MenuView.st,v 1.90 1996-07-19 18:56:24 cg Exp $'
 ! !