--- a/Workspace.st Mon Nov 14 16:19:33 2016 +0100
+++ b/Workspace.st Tue Nov 15 01:10:15 2016 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
"
COPYRIGHT (c) 1989 by Claus Gittinger
All Rights Reserved
@@ -1785,7 +1783,7 @@
] ifFalse:[
codeToEvaluate := (self selectionOrTextOfCursorLine ? '') withoutSeparators.
].
- idx := codeToEvaluate indexOf:'»'.
+ idx := codeToEvaluate indexOf:'»'.
idx ~~ 0 ifTrue:[
selector := (codeToEvaluate copyFrom:idx+1) withoutSeparators string.
(selector startsWith:'#') ifTrue:[
@@ -1918,11 +1916,10 @@
] ifFalse:[
(cls notNil
and:[ cls nameSpace notNil
- and:[ cls nameSpace isNameSpace
and:[ nameOfVariable knownAsSymbol
and:[ (nsClass := cls nameSpace at:nameOfVariable asSymbol) notNil
and:[ nsClass isBehavior
- ]]]]]) ifTrue:[
+ ]]]]) ifTrue:[
"/ a namespace class?
browserClass browseReferendsOf:nsClass name
] ifFalse:[
@@ -2030,8 +2027,8 @@
('Implementors of It' browseImplementorsOfIt ImplementorsOfIt )
('References to It' browseReferencesToIt )
"/ ('Classes Containing It in Name' browseClassesContainingItInName )
-"/ ('Methods ContanÃning It in Name' browseMethodsContainingItInName )
-"/ ('Methods ContanÃning It in Source' browseMethodsContainingItInSource )
+"/ ('Methods Contaníning It in Name' browseMethodsContainingItInName )
+"/ ('Methods Contaníning It in Source' browseMethodsContainingItInSource )
('-' )
('TimeIt' timeIt )
('SpyOnIt' spyOnIt ))