--- a/Parser.st	Thu Feb 20 16:18:57 2014 +0100
+++ b/Parser.st	Sat Feb 22 16:56:35 2014 +0100
@@ -8537,7 +8537,7 @@
         "/ We only care for WorkspaceVars in doIts
         (self isDoIt) ifTrue:[
             (Workspace notNil
-            and:[(holder := Workspace workspaceVariableAt:varName) notNil])
+            and:[(holder := Workspace workspaceVariableHolderAt:varName) notNil])
             ifTrue:[
                 ^ (VariableNode type:#WorkspaceVariable holder:holder name:varName)
                     startPosition: tokenPosition endPosition: tokenPosition + varName size - 1
@@ -11784,11 +11784,11 @@
 !Parser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.802 2014-02-18 17:07:04 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.803 2014-02-22 15:56:35 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.802 2014-02-18 17:07:04 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Parser.st,v 1.803 2014-02-22 15:56:35 cg Exp $'
 !
 
 version_SVN