--- a/DialogBox.st	Tue Feb 27 01:13:20 1996 +0100
+++ b/DialogBox.st	Tue Feb 27 01:21:32 1996 +0100
@@ -792,6 +792,7 @@
     |box answer|
 
     box := YesNoBox title:aString.
+    box label:(self classResources string:'Confirm').
     box yesAction:[answer := true] noAction:[answer := false].
     box showAtPointer.
     box yesAction:nil noAction:nil.
@@ -801,11 +802,11 @@
      Dialog confirm:'really ?' 
 
      Transcript showCr:(
-	Dialog confirm:'are you certain ?'
+        Dialog confirm:'are you certain ?'
      )
     "
 
-    "Modified: 27.1.1996 / 14:19:39 / cg"
+    "Modified: 27.2.1996 / 01:17:54 / cg"
 !
 
 confirm:aString initialAnswer:what
@@ -3496,5 +3497,5 @@
 !DialogBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.46 1996-02-22 20:43:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.47 1996-02-27 00:21:32 cg Exp $'
 ! !