--- a/InfoBox.st	Thu Dec 09 12:12:14 1999 +0100
+++ b/InfoBox.st	Thu Dec 09 12:13:43 1999 +0100
@@ -203,7 +203,7 @@
             InfoBitmap := img
         ] ifFalse:[
             imgFileName := StyleSheet at:'infoBox.iconFile' default:'bitmaps/Information.xbm'.
-            InfoBitmap := Smalltalk bitmapFromFileNamed:imgFileName forClass:self.
+            InfoBitmap := Smalltalk imageFromFileNamed:imgFileName forClass:self.
         ].
         InfoBitmap notNil ifTrue:[
             InfoBitmap := InfoBitmap onDevice:Display
@@ -369,5 +369,5 @@
 !InfoBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/InfoBox.st,v 1.35 1999-12-01 20:26:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/InfoBox.st,v 1.36 1999-12-09 11:13:43 cg Exp $'
 ! !