--- 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'!