--- a/SimpleView.st	Fri Feb 22 08:44:50 2019 +0100
+++ b/SimpleView.st	Fri Feb 22 09:30:26 2019 +0100
@@ -9556,6 +9556,15 @@
     "Modified: 5.6.1996 / 14:25:35 / cg"
 !
 
+isTextLabel
+    "return true, if the receiver is a text label.
+     Return false here, this is redefined in Label."
+
+    ^ false
+
+    "Created: / 22-02-2019 / 09:29:52 / Claus Gittinger"
+!
+
 isTextView
 
     "Returns true, if the view displays text"