--- a/SyncedMultiColumnTextView.st Thu Apr 25 19:26:27 1996 +0200
+++ b/SyncedMultiColumnTextView.st Thu Apr 25 19:33:23 1996 +0200
@@ -10,13 +10,11 @@
hereby transferred.
"
-'From Smalltalk/X, Version:2.10.8 on 20-nov-1995 at 14:11:21' !
-
SimpleView subclass:#SyncedMultiColumnTextView
- instanceVariableNames:'textViews'
- classVariableNames:''
- poolDictionaries:''
- category:'Views-Text'
+ instanceVariableNames:'textViews'
+ classVariableNames:''
+ poolDictionaries:''
+ category:'Views-Text'
!
!SyncedMultiColumnTextView class methodsFor:'documentation'!
@@ -47,10 +45,21 @@
See concrete examples in subclasses: TwoColumnTextView, DiffTextView etc.
"
-!
+! !
+
+!SyncedMultiColumnTextView methodsFor:'change & update'!
-version
-^ '$Header: /cvs/stx/stx/libwidg2/SyncedMultiColumnTextView.st,v 1.3 1995-11-24 13:35:33 cg Exp $'
+update:something with:someArgument from:changedObject
+ "/
+ "/ if any of my views changes its contents,
+ "/ I have logically changed my contents -> to give scrollbar
+ "/ a chance to update
+ "/
+ something == #sizeOfContents ifTrue:[
+ self changed:something
+ ].
+
+ "Created: 24.11.1995 / 11:11:22 / cg"
! !
!SyncedMultiColumnTextView methodsFor:'initialization'!
@@ -88,21 +97,6 @@
"Modified: 24.11.1995 / 11:08:31 / cg"
! !
-!SyncedMultiColumnTextView methodsFor:'change & update'!
-
-update:something with:someArgument from:changedObject
- "/
- "/ if any of my views changes its contents,
- "/ I have logically changed my contents -> to give scrollbar
- "/ a chance to update
- "/
- something == #sizeOfContents ifTrue:[
- self changed:something
- ].
-
- "Created: 24.11.1995 / 11:11:22 / cg"
-! !
-
!SyncedMultiColumnTextView methodsFor:'queries'!
heightOfContents
@@ -261,3 +255,8 @@
"Modified: 24.11.1995 / 14:22:19 / cg"
! !
+!SyncedMultiColumnTextView class methodsFor:'documentation'!
+
+version
+^ '$Header: /cvs/stx/stx/libwidg2/SyncedMultiColumnTextView.st,v 1.4 1996-04-25 17:32:23 cg Exp $'
+! !