equal
deleted
inserted
replaced
213 shown ifTrue:[ |
213 shown ifTrue:[ |
214 self withWaitCursorDo:[ |
214 self withWaitCursorDo:[ |
215 (image notNil and: [image device ~~ device]) ifTrue:[ |
215 (image notNil and: [image device ~~ device]) ifTrue:[ |
216 devImage := image on:device. |
216 devImage := image on:device. |
217 devImage ~~ image ifTrue:[ |
217 devImage ~~ image ifTrue:[ |
218 self halt. |
|
219 image := devImage. |
218 image := devImage. |
220 ]. |
219 ]. |
221 ]. |
220 ]. |
222 self clear. |
221 self clear. |
223 self invalidate |
222 self invalidate |
351 ! ! |
350 ! ! |
352 |
351 |
353 !ImageView class methodsFor:'documentation'! |
352 !ImageView class methodsFor:'documentation'! |
354 |
353 |
355 version |
354 version |
356 ^ '$Header: /cvs/stx/stx/libwidg2/ImageView.st,v 1.41 2000-04-19 11:16:56 cg Exp $' |
355 ^ '$Header: /cvs/stx/stx/libwidg2/ImageView.st,v 1.42 2000-04-19 11:18:03 cg Exp $' |
357 ! ! |
356 ! ! |