#FEATURE by cg
authorClaus Gittinger <cg@exept.de>
Fri, 06 Mar 2020 19:30:35 +0100
changeset 6837 0247bc167e3a
parent 6836 95967bf98f8e
child 6838 b0895ffe7bd6
#FEATURE by cg class: InfoBox added: #isInfoOrWarningBox
InfoBox.st
--- a/InfoBox.st	Fri Mar 06 12:57:48 2020 +0100
+++ b/InfoBox.st	Fri Mar 06 19:30:35 2020 +0100
@@ -505,6 +505,12 @@
     "
 ! !
 
+!InfoBox methodsFor:'testing'!
+
+isInfoOrWarningBox
+    ^ true
+! !
+
 !InfoBox class methodsFor:'documentation'!
 
 version