author | Merge Script |
Thu, 21 Jan 2016 06:48:09 +0100 | |
branch | jv |
changeset 5564 | 3c9ef3181a09 |
parent 5562 | 0219152fb99f (current diff) |
parent 5563 | e6f461679c7d (diff) |
child 5568 | de26457e317d |
--- a/VariablePanel.st Tue Jan 19 07:05:36 2016 +0000 +++ b/VariablePanel.st Thu Jan 21 06:48:09 2016 +0100 @@ -1153,7 +1153,10 @@ |pos| - aCollectionOfRelativeCornerPositions size == self subViews size ifFalse:[^ self ]. + aCollectionOfRelativeCornerPositions size == self subViews size ifFalse:[ + 'VariablePanel [info]: size mismatch in relativeCorners' infoPrintCR. + ^ self + ]. pos := 0.0. self subViews with:aCollectionOfRelativeCornerPositions