--- a/NameLookupError.st	Thu Aug 12 15:28:30 2010 +0200
+++ b/NameLookupError.st	Wed Aug 18 20:34:07 2010 +0200
@@ -44,7 +44,10 @@
 !NameLookupError methodsFor:'accessing'!
 
 nameToLookup
-    ^ parameter.
+    request notNil ifTrue:[
+        ^ request canonicalName.
+    ].
+    ^ nil.
 !
 
 nameToLookup:something
@@ -75,11 +78,11 @@
 !NameLookupError class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/NameLookupError.st,v 1.4 2010-05-13 10:53:54 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/NameLookupError.st,v 1.5 2010-08-18 18:34:07 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic2/NameLookupError.st,v 1.4 2010-05-13 10:53:54 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/NameLookupError.st,v 1.5 2010-08-18 18:34:07 stefan Exp $'
 ! !
 
 NameLookupError initialize!