--- a/ETxtView.st	Fri Jun 19 02:22:20 1998 +0200
+++ b/ETxtView.st	Fri Jun 19 02:35:51 1998 +0200
@@ -401,6 +401,12 @@
     "Created: / 19.6.1998 / 00:03:49 / cg"
 !
 
+disable
+    self readOnly:true
+
+    "Created: / 19.6.1998 / 02:34:14 / cg"
+!
+
 textHasChanged
     ^ self modified
 
@@ -4383,5 +4389,5 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ETxtView.st,v 1.172 1998-06-19 00:22:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/Attic/ETxtView.st,v 1.173 1998-06-19 00:35:51 cg Exp $'
 ! !

--- a/EditTextView.st	Fri Jun 19 02:22:20 1998 +0200
+++ b/EditTextView.st	Fri Jun 19 02:35:51 1998 +0200
@@ -401,6 +401,12 @@
     "Created: / 19.6.1998 / 00:03:49 / cg"
 !
 
+disable
+    self readOnly:true
+
+    "Created: / 19.6.1998 / 02:34:14 / cg"
+!
+
 textHasChanged
     ^ self modified
 
@@ -4383,5 +4389,5 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.172 1998-06-19 00:22:20 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.173 1998-06-19 00:35:51 cg Exp $'
 ! !