VerticalPanelView.st
changeset 6720 30dc6274571a
parent 6495 27d97d8e5ae1
child 6747 121b6e62d393
--- a/VerticalPanelView.st	Thu Oct 24 17:39:50 2019 +0200
+++ b/VerticalPanelView.st	Thu Oct 24 17:42:59 2019 +0200
@@ -770,7 +770,9 @@
      maxWidth maxHeight resizeToMaxV resizeToMaxH m2 subViews restHeight y2 bw|
 
     subViews := self subViewsToConsider.
-    subViews size == 0 ifTrue:[^ self].
+    subViews isEmptyOrNil ifTrue:[
+        ^ self
+    ].
 
     bw := self borderWidth.
 
@@ -1058,6 +1060,7 @@
     "Modified: / 04-09-1995 / 18:43:29 / claus"
     "Modified: / 10-10-2007 / 13:47:56 / cg"
     "Modified (format): / 20-06-2017 / 10:46:08 / cg"
+    "Modified: / 24-10-2019 / 16:04:56 / Stefan Vogel"
 ! !
 
 !VerticalPanelView methodsFor:'queries'!