SyncedMultiColumnTextView.st
changeset 4131 c7dde0b20bfd
parent 4125 1792b29efdea
child 5808 51da0754f9d1
--- 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 $'
 ! !