ChangesBrowser.st
changeset 33 11474e0f4d00
parent 31 7ee4217817fa
child 37 50f59bad66b1
--- a/ChangesBrowser.st	Sun Aug 07 21:31:48 1994 +0200
+++ b/ChangesBrowser.st	Sun Aug 07 22:00:05 1994 +0200
@@ -27,7 +27,7 @@
 COPYRIGHT (c) 1990 by Claus Gittinger
             All Rights Reserved
 
-$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.13 1994-08-05 10:21:22 claus Exp $
+$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.14 1994-08-07 20:00:05 claus Exp $
 '!
 
 !ChangesBrowser class methodsFor:'documentation'!
@@ -48,7 +48,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.13 1994-08-05 10:21:22 claus Exp $
+$Header: /cvs/stx/stx/libtool/ChangesBrowser.st,v 1.14 1994-08-07 20:00:05 claus Exp $
 "
 !
 
@@ -106,6 +106,7 @@
     v := HVScrollableView for:CodeView miniScrollerH:true miniScrollerV:false in:frame.
     v origin:(0.0 @ 0.3) corner:(1.0 @ 1.0).
     codeView := v scrolledView.
+    codeView readOnly.
 
     anyChanges := false.
     ObjectMemory addDependent:self.   "to get shutdown-update"