--- a/WarningBox.st	Thu Oct 06 23:14:34 2016 +0200
+++ b/WarningBox.st	Thu Oct 06 23:14:35 2016 +0200
@@ -11,6 +11,8 @@
 "
 "{ Package: 'stx:libwidg' }"
 
+"{ NameSpace: Smalltalk }"
+
 InfoBox subclass:#WarningBox
 	instanceVariableNames:''
 	classVariableNames:'WarnBitmap ErrorBitmap'
@@ -40,7 +42,7 @@
         originally, ST/X had separate classes for the various entry methods;
         there were YesNoBox, EnterBox, InfoBox and so on.
         In the meantime, the DialogBox class (and therefore its alias: Dialog)
-        is going to duplicate most funcionality found in these classes.
+        is going to duplicate most functionality found in these classes.
 
         In the future, those existing subclasses' functionality might
         be moved fully into Dialog, and the subclasses be replaced by dummy
@@ -48,7 +50,7 @@
 
 
 
-    this class implements a pop-up box to show an information message. 
+    this class implements a pop-up box to show an information message.
     WarningBoxes are basically InfoBoxes with a different bitmap-image.
     (also, they add a beep when popping up)
 
@@ -83,7 +85,7 @@
 examples
 "
     Notice, the preferred use is via the DialogBox class messages,
-    such as 
+    such as
                                                                         [exBegin]
         Dialog warn:'Attention !!'
                                                                         [exEnd]
@@ -101,15 +103,15 @@
     since all objects support the #warn message,
     you can also simply use (for any self):
                                                                         [exBegin]
-        self warn:'you should not do this' 
+        self warn:'you should not do this'
                                                                         [exEnd]
 
     with attributed text:
                                                                         [exBegin]
-        Dialog warn:(Text string:'you should not do this' 
+        Dialog warn:(Text string:'you should not do this'
                           emphasis:#color->Color red)
                                                                         [exEnd]
-        
+
     specifying more details of the warnBox (low level entries).
     label of OK-button:
                                                                         [exBegin]
@@ -256,5 +258,6 @@
 !WarningBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/WarningBox.st,v 1.35 2008-07-14 19:33:37 cg Exp $'
+    ^ '$Header$'
 ! !
+