--- a/DialogBox.st Tue Jul 09 15:27:30 2019 +0200
+++ b/DialogBox.st Wed Jul 10 18:23:10 2019 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 1994 by Claus Gittinger
All Rights Reserved
@@ -1464,6 +1466,18 @@
"
"Created: / 15-02-2019 / 09:40:17 / Claus Gittinger"
+!
+
+warn:aString with:arg1 with:arg2
+ "launch a Dialog to warn user"
+
+ ^ self warn:(aString bindWith:arg1 with:arg2)
+
+ "
+ Dialog warn:'some %1 message %2' with:'warning' with:'with argument'
+ "
+
+ "Created: / 10-07-2019 / 18:17:57 / Claus Gittinger"
! !
!DialogBox class methodsFor:'confirmation dialogs'!