PanelView.st
changeset 3117 6d0c7aa281f2
parent 2753 8e1f4b3fc40a
child 3501 bd23629696c7
--- a/PanelView.st	Thu Dec 16 12:35:11 2004 +0100
+++ b/PanelView.st	Fri Jan 07 11:22:50 2005 +0100
@@ -177,14 +177,12 @@
      Setting this flag will make the panel reorganize the elements whenever
      any element changes its size."
 
-    |subViews|
-
-    elementsChangeSize := aBoolean.
-    aBoolean ifTrue:[
-        self makeMyselfDependentOnSubviews.
-    ]
-
-    "Modified: / 17.1.1998 / 00:19:14 / cg"
+    elementsChangeSize ~~ aBoolean ifTrue:[
+        elementsChangeSize := aBoolean.
+        aBoolean ifTrue:[
+            self makeMyselfDependentOnSubviews.
+        ].
+    ].
 !
 
 horizontalLayout
@@ -365,19 +363,19 @@
     "an element changed its size"
 
     something == #sizeOfView ifTrue:[
-        elementsChangeSize == true ifTrue:[
+        elementsChangeSize ifTrue:[
             self layoutChanged.
         ].
         ^ self
     ].
 "/    something == #preferredExtent ifTrue:[
-"/        elementsChangeSize == true ifTrue:[
+"/        elementsChangeSize ifTrue:[
 "/            self layoutChanged.
 "/        ].
 "/        ^ self
 "/    ].
     something == #visibility ifTrue:[
-        ignoreInvisibleComponents == true ifTrue:[
+        ignoreInvisibleComponents ifTrue:[
             self layoutChanged.
         ].
         ^ self
@@ -564,5 +562,5 @@
 !PanelView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/PanelView.st,v 1.37 2003-05-07 15:08:08 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/PanelView.st,v 1.38 2005-01-07 10:22:50 stefan Exp $'
 ! !