--- a/TextView.st	Wed Sep 07 16:23:58 2011 +0200
+++ b/TextView.st	Thu Sep 08 05:22:36 2011 +0200
@@ -2410,12 +2410,6 @@
     ^ false
 !
 
-isTextView
-    "I am showing text"
-
-    ^ true
-!
-
 specClass
     "redefined, since the name of my specClass is nonStandard (i.e. not TextViewSpec)"
 
@@ -4370,14 +4364,22 @@
     "Modified: 29.4.1996 / 12:32:08 / cg"
 ! !
 
+!TextView methodsFor:'testing'!
+
+isTextView
+    "I am showing text"
+
+    ^ true
+! !
+
 !TextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.324 2011-06-14 12:08:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.325 2011-09-08 03:22:36 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.324 2011-06-14 12:08:52 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/TextView.st,v 1.325 2011-09-08 03:22:36 cg Exp $'
 ! !
 
 TextView initialize!