ImageView.st
changeset 5400 db097f6162be
parent 5399 0dab5e63d3d9
child 5402 ac1a78db1d84
equal deleted inserted replaced
5399:0dab5e63d3d9 5400:db097f6162be
   685     |oldMagnifiedImage|
   685     |oldMagnifiedImage|
   686     
   686     
   687     oldMagnifiedImage := magnifiedImage.
   687     oldMagnifiedImage := magnifiedImage.
   688     magnifiedImage := nil.
   688     magnifiedImage := nil.
   689     self generateMagnifiedImage.
   689     self generateMagnifiedImage.
   690     oldMagnifiedImage extent = magnifiedImage extent ifFalse:[
   690     (oldMagnifiedImage isNil
   691         self clear.
   691       or:[ magnifiedImage isNil
       
   692       or:[ oldMagnifiedImage extent ~= magnifiedImage extent ]]
       
   693     ) ifTrue:[
       
   694         "/ self clear.
   692         self invalidate.
   695         self invalidate.
   693     ].
   696     ].
   694 ! !
   697 ! !
   695 
   698 
   696 !ImageView methodsFor:'initialization & release'!
   699 !ImageView methodsFor:'initialization & release'!