#BUGFIX by cg
authorClaus Gittinger <cg@exept.de>
Mon, 25 Nov 2019 15:13:53 +0100
changeset 6742 5e0000410bcc
parent 6741 e10ca4712018
child 6743 0b085cd5ffca
#BUGFIX by cg class: Workspace changed: #browseReferencesTo:
Workspace.st
--- a/Workspace.st	Mon Nov 25 12:15:05 2019 +0100
+++ b/Workspace.st	Mon Nov 25 15:13:53 2019 +0100
@@ -2060,10 +2060,11 @@
                         (cls notNil
                           and:[ cls nameSpace notNil
                           and:[ cls nameSpace isNameSpace            
-                          and:[ (cls nameSpace name,'::',nameOfVariable) "nameOfVariable" knownAsSymbol  
-                          and:[ (nsClass := cls nameSpace at:nameOfVariable) notNil
+                          and:[ (cls nameSpace name,'::',nameOfVariable) "nameOfVariable" knownAsSymbol
+                          and:[ nameOfVariable knownAsSymbol
+                          and:[ (nsClass := cls nameSpace at:nameOfVariable asSymbol) notNil
                           and:[ nsClass isBehavior
-                        ]]]]]) ifTrue:[
+                        ]]]]]]) ifTrue:[
                             "/ a namespace class?
                             browserClass browseReferendsOf:nsClass name
                         ] ifFalse:[