--- a/FileBrowser.st	Mon Jan 19 20:41:50 1998 +0100
+++ b/FileBrowser.st	Thu Jan 22 13:36:49 1998 +0100
@@ -2182,17 +2182,20 @@
 
     (Image isImageFileSuffix:(aFilename asFilename suffix))
     ifTrue:[
-	img := Image fromFile:(currentDirectory construct:aFilename).
-	img notNil ifTrue:[
-	    img inspect.
-	    ^ true
-	]
+        img := Image fromFile:(currentDirectory construct:aFilename).
+        img notNil ifTrue:[
+            ImageEditor openOnImage:img.
+"/            img inspect.
+            ^ true
+        ]
     ].
     ^ false
 
     "Created: 19.6.1996 / 09:43:50 / cg"
     "Modified: 18.4.1997 / 14:56:04 / cg"
     "Modified: 18.9.1997 / 16:35:48 / stefan"
+
+
 !
 
 initialCommandFor:fileName into:aBox
@@ -4011,5 +4014,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.214 1998-01-17 14:20:30 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.215 1998-01-22 12:36:49 ca Exp $'
 ! !