added preferredWidth & preferredHeight
authorClaus Gittinger <cg@exept.de>
Fri, 30 May 2008 14:25:26 +0200
changeset 4970 6a58581288cc
parent 4969 f4adf8354162
child 4971 d69d04717240
added preferredWidth & preferredHeight
SimpleView.st
--- a/SimpleView.st	Fri May 30 14:01:32 2008 +0200
+++ b/SimpleView.st	Fri May 30 14:25:26 2008 +0200
@@ -7972,6 +7972,14 @@
     "Modified: 19.7.1996 / 20:43:32 / cg"
 !
 
+preferredHeight
+    ^ self preferredExtent y
+!
+
+preferredWidth
+    ^ self preferredExtent x
+!
+
 reallyRealized
     "return true, if the receiver is realized and all containers
      are realized."
@@ -10127,7 +10135,7 @@
 !SimpleView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.584 2008-05-30 12:01:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/SimpleView.st,v 1.585 2008-05-30 12:25:26 cg Exp $'
 ! !
 
 SimpleView initialize!