--- a/Tools__CodeHighlightingService.st Wed Jul 06 20:14:19 2011 +0200
+++ b/Tools__CodeHighlightingService.st Wed Jul 06 21:00:46 2011 +0200
@@ -149,13 +149,14 @@
]
]
].
+
anyChange := false.
newLines := newCode asStringCollection.
list := textView list.
list isNil ifTrue:[
textView list:newLines.
] ifFalse:[
- "/ the cursor line first - thats where your eyes are ...
+ "/ the cursor line first - that's where your eyes are ...
(l := textView cursorLine) notNil ifTrue:[
l <= newLines size ifTrue:[
replaceAction value:l value:(newLines at:l)
@@ -173,6 +174,7 @@
"Modified: / 09-10-2006 / 11:50:17 / cg"
"Created: / 14-02-2010 / 16:10:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
"Modified: / 06-03-2010 / 19:58:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+ "Modified (format): / 06-07-2011 / 18:21:12 / cg"
!
showInfo: aString
@@ -345,7 +347,7 @@
!CodeHighlightingService class methodsFor:'documentation'!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeHighlightingService.st,v 1.4 2011-07-05 09:13:00 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeHighlightingService.st,v 1.5 2011-07-06 19:00:46 cg Exp $'
!
version_SVN