--- a/DialogBox.st	Wed Nov 22 13:20:33 2000 +0100
+++ b/DialogBox.st	Wed Nov 22 14:16:13 2000 +0100
@@ -1183,6 +1183,15 @@
     "Modified: 14.11.1996 / 16:02:30 / cg"
 !
 
+confirm:aString default:what
+    "launch a Dialog, which allows user to enter yes or no.
+     return true for yes, false for no.
+     InitialAnswer must be true or false and defines which button is to be
+     the default (i.e. return-) button"
+
+    ^ self confirm:aString initialAnswer:what
+!
+
 confirm:aString initialAnswer:what
     "launch a Dialog, which allows user to enter yes or no.
      return true for yes, false for no.
@@ -6688,6 +6697,6 @@
 !DialogBox class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.158 2000-11-22 09:36:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/DialogBox.st,v 1.159 2000-11-22 13:16:13 cg Exp $'
 ! !
 DialogBox initialize!