--- a/SyncedMultiColumnTextView.st Fri Jun 01 20:42:42 2012 +0200
+++ b/SyncedMultiColumnTextView.st Fri Jun 08 09:38:47 2012 +0200
@@ -110,7 +110,7 @@
"/
something == #originOfContents ifTrue:[
"/ beware of recursive calls
- scrollLock == true ifFalse:[
+ scrollLock ifFalse:[
scrollLock := true.
textViews do:[:v|
v ~~ changedObject ifTrue:[
@@ -126,7 +126,7 @@
"Created: / 24-11-1995 / 11:11:22 / cg"
"Modified: / 25-09-1997 / 11:46:32 / stefan"
- "Modified: / 18-10-2006 / 17:58:30 / cg"
+ "Modified: / 06-06-2012 / 11:04:21 / cg"
! !
!SyncedMultiColumnTextView methodsFor:'initialization'!
@@ -134,6 +134,8 @@
initialize
|n wEach org crn cls|
+ scrollLock := false.
+
super initialize.
cls := self textViewClass.
@@ -163,7 +165,7 @@
].
"Created: / 20-11-1995 / 13:06:16 / cg"
- "Modified: / 06-10-2006 / 14:29:13 / cg"
+ "Modified: / 06-06-2012 / 11:04:03 / cg"
! !
!SyncedMultiColumnTextView methodsFor:'queries'!
@@ -323,5 +325,5 @@
!SyncedMultiColumnTextView class methodsFor:'documentation'!
version
-^ '$Header: /cvs/stx/stx/libwidg2/SyncedMultiColumnTextView.st,v 1.12 2012-05-08 12:28:15 cg Exp $'
+^ '$Header: /cvs/stx/stx/libwidg2/SyncedMultiColumnTextView.st,v 1.13 2012-06-08 07:38:47 cg Exp $'
! !