#FEATURE by stefan default
authorStefan Vogel <sv@exept.de>
Wed, 29 Apr 2020 22:35:08 +0200
changeset 4461 eb7635490a02
parent 4460 e067415ddf46
#FEATURE by stefan class: SimpleDialog added: #isDialog
SimpleDialog.st
--- a/SimpleDialog.st	Wed Apr 29 22:34:37 2020 +0200
+++ b/SimpleDialog.st	Wed Apr 29 22:35:08 2020 +0200
@@ -643,6 +643,14 @@
     "Created: / 31-07-2013 / 18:06:12 / cg"
 ! !
 
+!SimpleDialog methodsFor:'testing'!
+
+isDialog
+    ^ true
+
+    "Created: / 29-04-2020 / 12:38:36 / Stefan Vogel"
+! !
+
 !SimpleDialog class methodsFor:'documentation'!
 
 version