--- a/WarningBox.st	Thu Aug 14 18:39:22 2003 +0200
+++ b/WarningBox.st	Mon Aug 18 19:13:54 2003 +0200
@@ -156,7 +156,7 @@
     |img imgFileName|
 
     ErrorBitmap isNil ifTrue:[
-        img := StyleSheet at:'errorBox.icon'.
+        img := self styleSheet at:'errorBox.icon'.
         img isNil ifTrue:[
             imgFileName := StyleSheet at:'errorBox.iconFile' default:'bitmaps/Error.xbm'.
             img := Smalltalk imageFromFileNamed:imgFileName forClass:self.
@@ -217,7 +217,7 @@
     |img imgFileName|
 
     WarnBitmap isNil ifTrue:[
-        img := StyleSheet at:'warningBox.icon'.
+        img := self styleSheet at:'warningBox.icon'.
         img isNil ifTrue:[
             imgFileName := StyleSheet at:'warningBox.iconFile' default:'bitmaps/Warning.xbm'.
             img := Smalltalk imageFromFileNamed:imgFileName forClass:self.
@@ -283,5 +283,5 @@
 !WarningBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/WarningBox.st,v 1.31 2001-11-16 14:18:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/WarningBox.st,v 1.32 2003-08-18 17:13:54 cg Exp $'
 ! !