--- 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 $'
 ! !

--- a/RadioButton.st	Thu Dec 09 12:12:14 1999 +0100
+++ b/RadioButton.st	Thu Dec 09 12:13:43 1999 +0100
@@ -505,7 +505,7 @@
 
     f := StyleSheet at:#'radioButton.activeImageFile'.
     f notNil ifTrue:[
-        f := Smalltalk bitmapFromFileNamed:f forClass:self.
+        f := Smalltalk imageFromFileNamed:f forClass:self.
     ] ifFalse:[
         f := StyleSheet at:#'radioButton.activeImage'.
     ].
@@ -515,7 +515,7 @@
 
     f := StyleSheet at:#'radioButton.passiveImageFile'.
     f notNil ifTrue:[
-        f := Smalltalk bitmapFromFileNamed:f forClass:self.
+        f := Smalltalk imageFromFileNamed:f forClass:self.
     ] ifFalse:[
         f := StyleSheet at:#'radioButton.passiveImage'.
     ].
@@ -787,5 +787,5 @@
 !RadioButton class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/RadioButton.st,v 1.32 1999-12-01 20:28:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/RadioButton.st,v 1.33 1999-12-09 11:13:24 cg Exp $'
 ! !