diff -r c259fe3a937b -r 2eb5c15c72fb DialogBox.st --- 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!