--- a/TextView.st	Sat Sep 10 15:06:54 2016 +0200
+++ b/TextView.st	Sat Sep 10 15:10:12 2016 +0200
@@ -1009,6 +1009,13 @@
 
 searchBarActionBlock:something
     searchBarActionBlock := something.
+!
+
+textView
+    "added to allow sending textView in any context, where either
+     a TextView or a CodeView2 can be encountered. Sigh."
+     
+    ^ self
 ! !
 
 !TextView methodsFor:'accessing-behavior'!