--- a/DirectoryContentsBrowser.st Mon Oct 06 11:50:03 2003 +0200
+++ b/DirectoryContentsBrowser.st Mon Oct 06 13:31:43 2003 +0200
@@ -1942,7 +1942,7 @@
previewIndex := 0.
] ifFalse:[
(anItem hasMimeType and:[anItem mimeType isImage]) ifTrue:[
- Exception handle:[:ex|
+ Error handle:[:ex|
icon := nil.
] do:[ |scale extent w h |
icon := Image fromFile:(anItem fileName pathName).
@@ -3041,5 +3041,5 @@
!DirectoryContentsBrowser class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.128 2003-09-04 18:55:49 stefan Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.129 2003-10-06 11:31:43 cg Exp $'
! !