--- a/SelectionInTreeView.st	Thu Jun 17 10:51:17 1999 +0200
+++ b/SelectionInTreeView.st	Fri Jun 18 22:37:38 1999 +0200
@@ -157,7 +157,7 @@
 
     ^ Icon
         constantNamed:#plus
-        ifAbsentPut:[Image fromFile:('xpmBitmaps/plus.xpm')]
+        ifAbsentPutImageFromFile:'xpmBitmaps/plus.xpm'
 
 
 
@@ -173,7 +173,7 @@
 
     ^ Icon
         constantNamed:#directory
-        ifAbsentPut:[Image fromFile:('xpmBitmaps/document_images/tiny_yellow_dir.xpm')]
+        ifAbsentPutImageFromFile:'xpmBitmaps/document_images/tiny_yellow_dir.xpm'
 
 !
 
@@ -184,7 +184,7 @@
 
     ^ Icon
         constantNamed:#plainFile
-        ifAbsentPut:[Image fromFile:('xpmBitmaps/document_images/tiny_file_plain.xpm')]
+        ifAbsentPutImageFromFile:'xpmBitmaps/document_images/tiny_file_plain.xpm'
 
 
 
@@ -199,7 +199,7 @@
 
     ^ Icon
         constantNamed:#directoryOpened
-        ifAbsentPut:[Image fromFile:('xpmBitmaps/document_images/tiny_yellow_dir_open.xpm')]
+        ifAbsentPutImageFromFile:'xpmBitmaps/document_images/tiny_yellow_dir_open.xpm'
 
 !
 
@@ -210,7 +210,7 @@
 
     ^ Icon
         constantNamed:#minus
-        ifAbsentPut:[Image fromFile:('xpmBitmaps/minus.xpm')]
+        ifAbsentPutImageFromFile:'xpmBitmaps/minus.xpm'
 
 
 ! !
@@ -2363,5 +2363,5 @@
 !SelectionInTreeView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.83 1999-04-23 12:47:39 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/SelectionInTreeView.st,v 1.84 1999-06-18 20:37:38 cg Exp $'
 ! !