--- a/SyntaxHighlighter2.st	Fri Mar 23 12:54:22 2012 +0100
+++ b/SyntaxHighlighter2.st	Fri Mar 23 14:03:23 2012 +0100
@@ -756,9 +756,11 @@
 rememberVariableElementFor:name type:typeSymbol from:pos1 to:pos2
     |element prev|
 
+    prev := lastVariableElements at:name ifAbsent:[nil].
+    (prev notNil and:[prev start == pos1]) ifTrue:[^ self].
+
     element := SyntaxElement from: pos1 to: pos2 type:typeSymbol value: name.
 
-    prev := lastVariableElements at:name ifAbsent:[nil].
     prev notNil ifTrue:[prev next:element].
     lastVariableElements at:name put:element.
 
@@ -770,7 +772,7 @@
 !SyntaxHighlighter2 class methodsFor:'documentation'!
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/SyntaxHighlighter2.st,v 1.8 2012-01-19 09:48:54 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/SyntaxHighlighter2.st,v 1.9 2012-03-23 13:03:23 cg Exp $'
 !
 
 version_SVN