avoid useless work (ignore updates from changed components sometimes)
authorClaus Gittinger <cg@exept.de>
Fri, 08 Oct 1999 17:22:03 +0200
changeset 2034 2efa727de60f
parent 2033 fc16e79f649b
child 2035 6924861adf08
avoid useless work (ignore updates from changed components sometimes)
PanelView.st
--- a/PanelView.st	Fri Oct 08 17:21:25 1999 +0200
+++ b/PanelView.st	Fri Oct 08 17:22:03 1999 +0200
@@ -363,11 +363,15 @@
     "an element changed its size"
 
     something == #sizeOfView ifTrue:[
-        self layoutChanged.
+        elementsChangeSize == true ifTrue:[
+            self layoutChanged.
+        ].
         ^ self
     ].
     something == #visibility ifTrue:[
-        self layoutChanged.
+        ignoreInvisibleComponents == true ifTrue:[
+            self layoutChanged.
+        ].
         ^ self
     ].
     ^ super update:something with:aParameter from:changedObject
@@ -554,5 +558,5 @@
 !PanelView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/PanelView.st,v 1.31 1999-09-07 09:14:16 tm Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/PanelView.st,v 1.32 1999-10-08 15:22:03 cg Exp $'
 ! !