# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1367065638 -7200
# Node ID a173c8753a07f5c77f68ca560c60c863df6bfb3c
# Parent  91c12c87cde19fbd599dfaf5fd5217cd9a068844
exception access

diff -r 91c12c87cde1 -r a173c8753a07 DirectoryView.st
--- a/DirectoryView.st	Thu Apr 25 15:11:10 2013 +0200
+++ b/DirectoryView.st	Sat Apr 27 14:27:18 2013 +0200
@@ -888,7 +888,7 @@
     (image := aGC registeredImageAt: fileName name asSymbol) isNil
     ifTrue:[            
         size < maxImageFileSize ifTrue:[     
-            Object errorSignal handle: [:ex|]
+            Error handle: [:ex|]
             do:[   
                 (image := Image fromFile: fileName name) notNil ifTrue:[
                     image extent y > 22 ifTrue:[         
@@ -901,9 +901,6 @@
     ].
     image notNil ifTrue: [imageFromFile := true. iconKey := fileName name asSymbol].
     ^image
-
-
-
 !
 
 size
@@ -972,3 +969,4 @@
 version
     ^ '$Header$'
 ! !
+