--- a/InfoBox.st	Wed Aug 18 16:42:04 1999 +0200
+++ b/InfoBox.st	Wed Aug 18 16:44:40 1999 +0200
@@ -206,7 +206,7 @@
             InfoBitmap := Image fromFile:imgFileName.
         ].
         InfoBitmap notNil ifTrue:[
-            InfoBitmap := InfoBitmap on:Display
+            InfoBitmap := InfoBitmap onDevice:Display
         ]
     ].
     ^ InfoBitmap
@@ -369,5 +369,5 @@
 !InfoBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/InfoBox.st,v 1.33 1997-10-28 20:02:34 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/InfoBox.st,v 1.34 1999-08-18 14:44:40 cg Exp $'
 ! !