#OTHER by cg
authorClaus Gittinger <cg@exept.de>
Fri, 06 Mar 2020 21:56:22 +0100
changeset 6842 229d35ce07c2
parent 6841 799ffdc111c0
child 6843 6c5e543e903e
#OTHER by cg class: SimpleView added: #isWarningBox
YesNoBox.st
--- a/YesNoBox.st	Fri Mar 06 21:54:36 2020 +0100
+++ b/YesNoBox.st	Fri Mar 06 21:56:22 2020 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -336,6 +338,12 @@
     "Modified: 13.12.1995 / 16:20:01 / cg"
 ! !
 
+!YesNoBox methodsFor:'testing'!
+
+isWarningBox
+    ^ false
+! !
+
 !YesNoBox methodsFor:'user interaction'!
 
 noPressed