--- a/ImageView.st Wed Apr 10 12:49:13 2002 +0200
+++ b/ImageView.st Fri Apr 12 12:22:52 2002 +0200
@@ -281,7 +281,7 @@
!ImageView methodsFor:'drawing'!
redrawX:x y:y width:w height:h
- |xI yI depth ext imgWidth imgHeight right bott devImage|
+ |xI yI depth imgWidth imgHeight right bott devImage|
image notNil ifTrue:[
imgWidth := image width.
@@ -300,7 +300,7 @@
].
Object errorSignal handle:[:ex |
- Transcript showCR:'cannot convert image'.
+ Transcript showCR:'cannot convert image: ', ex description.
^ self.
] do:[
devImage := image onDevice:device.
@@ -384,5 +384,5 @@
!ImageView class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libwidg2/ImageView.st,v 1.45 2002-03-26 19:17:42 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libwidg2/ImageView.st,v 1.46 2002-04-12 10:22:52 cg Exp $'
! !