--- a/OptionBox.st	Sun May 23 13:59:53 1999 +0200
+++ b/OptionBox.st	Tue May 25 16:14:41 1999 +0200
@@ -297,11 +297,12 @@
 
 initFormBitmap
     WarnBitmap isNil ifTrue:[
-        WarnBitmap := Image fromFile:'bitmaps/Warning.xbm' resolution:100 on:Display 
+        WarnBitmap := WarningBox iconBitmap.
+"/        WarnBitmap := Image fromFile:'bitmaps/Warning.xbm' resolution:100 on:Display 
     ].
     formLabel form:WarnBitmap
 
-    "Modified: 19.12.1996 / 14:10:02 / cg"
+    "Modified: / 25.5.1999 / 16:08:06 / cg"
 !
 
 initialize
@@ -400,5 +401,5 @@
 !OptionBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.40 1998-07-27 17:37:49 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/OptionBox.st,v 1.41 1999-05-25 14:14:41 cg Exp $'
 ! !