SyntaxHighlighter2.st
branchjv
changeset 12308 5d9291c0fc27
parent 12233 f71206c1d1dd
child 12401 4714b9640528
child 12405 76f9a872362b
--- a/SyntaxHighlighter2.st	Fri Nov 30 14:25:59 2012 +0000
+++ b/SyntaxHighlighter2.st	Fri Nov 30 17:23:39 2012 +0000
@@ -314,9 +314,6 @@
         expr selectorPosition:pos1.
 
         self checkPlausibilityOf:expr from:pos1 to:pos2.
-        parseForCode ifFalse:[
-            self rememberSelectorUsed:sel receiver:receiver
-        ].
         receiver := expr.   "/ for next message
     ].
     ^ receiver
@@ -382,9 +379,6 @@
     ].
     expr lineNumber:lno.
     self checkPlausibilityOf:expr from:pos1 to:pos2.
-    parseForCode ifFalse:[
-        self rememberSelectorUsed:sel receiver:receiver
-    ].
 
 "/        (contextToEvaluateIn isNil and:[selfValue isNil]) ifTrue:[    "/ do not check this for doits
 "/            receiver isSuper ifTrue:[
@@ -508,9 +502,6 @@
                 ].
                 expr lineNumber:lNr.
                 self checkPlausibilityOf:expr from:pos to:pos2.
-                parseForCode ifFalse:[
-                    self rememberSelectorUsed:sel receiver:receiver
-                ].
                 ^ expr.
             ].
         ].
@@ -525,9 +516,6 @@
         expr lineNumber:lNr.
 
         self checkPlausibilityOf:expr from:pos to:pos2.
-        parseForCode ifFalse:[
-            self rememberSelectorUsed:sel receiver:receiver
-        ].
 
         receiver := expr.   "/ for next message
     ].
@@ -765,9 +753,9 @@
 !SyntaxHighlighter2 class methodsFor:'documentation'!
 
 version_CVS
-    ^ '§Header: /cvs/stx/stx/libtool/SyntaxHighlighter2.st,v 1.9 2012/03/23 13:03:23 cg Exp §'
+    ^ 'Header: /cvs/stx/stx/libtool/SyntaxHighlighter2.st,v 1.10 2012/10/19 14:59:02 cg Exp '
 !
 
 version_SVN
-    ^ '$Id: SyntaxHighlighter2.st 7982 2012-04-19 08:02:13Z vranyj1 $'
+    ^ '$Id: SyntaxHighlighter2.st 8074 2012-11-30 17:23:39Z vranyj1 $'
 ! !