class: SyntaxHighlighter
authorClaus Gittinger <cg@exept.de>
Fri, 14 Jun 2013 16:32:17 +0200
changeset 3187 7aa3c1a58647
parent 3186 2c1b6673c461
child 3188 cb84ffe12163
class: SyntaxHighlighter added: #markVariable:from:to:assigned: changed: #markAssignedVariable:from:to: #markVariable:from:to:
SyntaxHighlighter.st
--- a/SyntaxHighlighter.st	Wed Jun 12 10:36:27 2013 +0200
+++ b/SyntaxHighlighter.st	Fri Jun 14 16:32:17 2013 +0200
@@ -301,7 +301,7 @@
     or:[ type == #MethodArg
     or:[ type == #BlockVariable
     or:[ type == #MethodVariable]]]) ifTrue:[
-        self markVariable:v from:pos to:endPos.
+        self markVariable:v from:pos to:endPos assigned:true.
         ^ self
     ].
     (type == #GlobalVariable) ifTrue:[
@@ -703,7 +703,7 @@
     "Modified: / 31.3.1998 / 19:10:30 / cg"
 !
 
-markVariable:v from:pos to:endPos
+markVariable:v from:pos to:endPos assigned:assigned
     "support for syntaxColoring"
 
     |type globalValue nameSym|
@@ -753,10 +753,10 @@
 !SyntaxHighlighter class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/SyntaxHighlighter.st,v 1.70 2013-04-19 09:40:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/SyntaxHighlighter.st,v 1.71 2013-06-14 14:32:17 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/SyntaxHighlighter.st,v 1.70 2013-04-19 09:40:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/SyntaxHighlighter.st,v 1.71 2013-06-14 14:32:17 cg Exp $'
 ! !