SyntaxHighlighter2.st
changeset 12987 306d6dc6ffbb
parent 12984 65d53f09f5ac
child 13178 c9bf900fe729
child 13313 de38ade7083d
--- a/SyntaxHighlighter2.st	Mon Jun 24 16:20:38 2013 +0200
+++ b/SyntaxHighlighter2.st	Mon Jun 24 16:20:50 2013 +0200
@@ -708,6 +708,11 @@
     "Modified: / 18-11-2011 / 14:54:53 / cg"
 !
 
+markLocalIdentifierFrom:pos1 to:pos2
+    super markLocalIdentifierFrom:pos1 to:pos2.
+    self rememberVariableElementFor:tokenName type:#MethodVariable from:pos1 to:pos2 assigned:false
+!
+
 markMethodArgumentIdentifierFrom:pos1 to:pos2
     super markMethodArgumentIdentifierFrom:pos1 to:pos2.
     self rememberVariableElementFor:tokenName type:#MethodArg from:pos1 to:pos2 assigned:false
@@ -764,14 +769,17 @@
 !
 
 rememberVariableElementFor:name type:typeSymbol from:pos1 to:pos2 
-    self rememberVariableElementFor:name type:typeSymbol from:pos1 to:pos2 assigned:true
+    self rememberVariableElementFor:name type:typeSymbol from:pos1 to:pos2 assigned:false
 !
 
 rememberVariableElementFor:name type:typeSymbol from:pos1 to:pos2 assigned:assigned
     |element prev|
 
     prev := (lastVariableElements at:typeSymbol ifAbsentPut:[Dictionary new]) at:name ifAbsent:[nil].
-    (prev notNil and:[prev start == pos1]) ifTrue:[^ self].
+    (prev notNil and:[prev start == pos1]) ifTrue:[
+        prev assigned:assigned.
+        ^ self
+    ].
 
     element := (SyntaxElementVariable from: pos1 to: pos2 type:typeSymbol value: name assigned:assigned) name:name.
 
@@ -786,14 +794,14 @@
 !SyntaxHighlighter2 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/SyntaxHighlighter2.st,v 1.16 2013-06-24 13:41:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SyntaxHighlighter2.st,v 1.17 2013-06-24 14:20:50 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/SyntaxHighlighter2.st,v 1.16 2013-06-24 13:41:58 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SyntaxHighlighter2.st,v 1.17 2013-06-24 14:20:50 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: SyntaxHighlighter2.st,v 1.16 2013-06-24 13:41:58 cg Exp $'
+    ^ '$Id: SyntaxHighlighter2.st,v 1.17 2013-06-24 14:20:50 cg Exp $'
 ! !