--- a/VerticalPanelView.st	Tue Oct 09 10:44:03 2007 +0200
+++ b/VerticalPanelView.st	Tue Oct 09 10:44:12 2007 +0200
@@ -9,7 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
 "{ Package: 'stx:libwidg' }"
 
 PanelView subclass:#VerticalPanelView
@@ -713,11 +712,11 @@
     subViews := self subViewsToConsider.
     subViews size == 0 ifTrue:[^ self].
 
-    self extentChangedFlag ifTrue:[
-        ext := self computeExtent.
-        width := ext x.
-        height := ext y.
-    ].
+"/    self extentChangedFlag ifTrue:[
+"/        ext := self computeExtent.
+"/        width := ext x.
+"/        height := ext y.
+"/    ].
 
     space := verticalSpace.
     numChilds := subViews size.
@@ -1069,5 +1068,5 @@
 !VerticalPanelView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/VerticalPanelView.st,v 1.40 2005-01-07 10:26:49 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/VerticalPanelView.st,v 1.41 2007-10-09 08:44:12 ca Exp $'
 ! !