changeset 5400 | db097f6162be |
parent 5399 | 0dab5e63d3d9 |
child 5402 | ac1a78db1d84 |
--- a/ImageView.st Mon Jan 16 17:18:55 2017 +0100 +++ b/ImageView.st Mon Jan 16 17:22:06 2017 +0100 @@ -687,8 +687,11 @@ oldMagnifiedImage := magnifiedImage. magnifiedImage := nil. self generateMagnifiedImage. - oldMagnifiedImage extent = magnifiedImage extent ifFalse:[ - self clear. + (oldMagnifiedImage isNil + or:[ magnifiedImage isNil + or:[ oldMagnifiedImage extent ~= magnifiedImage extent ]] + ) ifTrue:[ + "/ self clear. self invalidate. ]. ! !