--- a/Tools__NewSystemBrowser.st Wed Oct 05 18:29:10 2016 +0200
+++ b/Tools__NewSystemBrowser.st Wed Oct 05 18:30:40 2016 +0200
@@ -34028,11 +34028,12 @@
"/ therefore, we setup a multiple pattern search here (sigh)
patternsForCodeSearch := OrderedCollection new.
aCollectionOfClasses do:[:each |
- |nm nm2 nm3|
-
- nm := each theNonMetaclass name.
- nm2 := each theNonMetaclass nameWithoutPrefix.
- nm3 := each theNonMetaclass nameWithoutNameSpacePrefix.
+ |nonMeta nm nm2 nm3|
+
+ nonMeta := each theNonMetaclass.
+ nm := nonMeta name.
+ nm2 := nonMeta nameWithoutPrefix.
+ nm3 := nonMeta nameWithoutNameSpacePrefix.
patternsForCodeSearch add:nm.
nm2 ~= nm ifTrue:[ patternsForCodeSearch add:nm2 ].
nm3 ~= nm ifTrue:[ patternsForCodeSearch add:nm3 ].