--- a/Tools__CodeHighlightingService.st Wed Jul 27 14:32:10 2011 +0200
+++ b/Tools__CodeHighlightingService.st Wed Jul 27 14:32:39 2011 +0200
@@ -231,7 +231,7 @@
workerRunning := true.
codeView syntaxElements: nil.
codeView syntaxElementSelection: nil.
- cls := codeView classHolder value.
+ cls := codeView klass.
(cls notNil and:[cls isObsolete]) ifTrue:[
cls isMeta ifTrue:[
cls := (Smalltalk at:cls theNonMetaclass name) class
@@ -305,9 +305,9 @@
]
] forkAt:prio
- "Modified: / 10-04-2011 / 18:21:32 / Jan Vrany <jan.vrany@fit.cvut.cz>"
"Modified: / 07-07-2011 / 12:26:12 / Jan Vrany <jan.vrant@fit.cvut,cz>"
"Modified: / 20-07-2011 / 15:14:14 / cg"
+ "Modified: / 27-07-2011 / 13:14:52 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
stopSyntaxHighlightProcess
@@ -350,10 +350,20 @@
"Modified: / 05-07-2011 / 11:10:11 / cg"
! !
+!CodeHighlightingService methodsFor:'registering'!
+
+registerIn: aCodeView
+
+ super registerIn: aCodeView.
+ self startSyntaxHighlightProcess.
+
+ "Created: / 27-07-2011 / 13:25:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
!CodeHighlightingService class methodsFor:'documentation'!
version_CVS
- ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeHighlightingService.st,v 1.9 2011-07-20 13:24:30 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/Tools__CodeHighlightingService.st,v 1.10 2011-07-27 12:32:39 vrany Exp $'
!
version_SVN