Browse Source

More use of `theMetaClass` instead of `class`.

Herbert Vojčík 7 years ago
parent
commit
f4fc60638c
2 changed files with 4 additions and 4 deletions
  1. 3 3
      src/Helios-References.js
  2. 1 1
      src/Helios-References.st

+ 3 - 3
src/Helios-References.js

@@ -1486,7 +1486,7 @@ $recv($1)._add_(each);
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 $ctx2.sendIdx["add:"]=1;
 //>>excludeEnd("ctx");
-return $recv($1)._add_($recv(each)._class());
+return $recv($1)._add_($recv(each)._theMetaClass());
 //>>excludeStart("ctx", pragmas.excludeDebugContexts);
 }, function($ctx2) {$ctx2.fillBlock({each:each},$ctx1,1)});
 //>>excludeEnd("ctx");
@@ -1498,10 +1498,10 @@ return self;
 },
 //>>excludeStart("ide", pragmas.excludeIdeData);
 args: [],
-source: "updateClassesAndMetaclassesCache\x0a\x09classesAndMetaclassesCache := OrderedCollection new.\x0a\x09\x0a\x09self environment classes do: [ :each |\x0a\x09\x09classesAndMetaclassesCache\x0a\x09\x09\x09\x09add: each; \x0a\x09\x09\x09\x09add: each class ]",
+source: "updateClassesAndMetaclassesCache\x0a\x09classesAndMetaclassesCache := OrderedCollection new.\x0a\x09\x0a\x09self environment classes do: [ :each |\x0a\x09\x09classesAndMetaclassesCache\x0a\x09\x09\x09\x09add: each; \x0a\x09\x09\x09\x09add: each theMetaClass ]",
 referencedClasses: ["OrderedCollection"],
 //>>excludeEnd("ide");
-messageSends: ["new", "do:", "classes", "environment", "add:", "class"]
+messageSends: ["new", "do:", "classes", "environment", "add:", "theMetaClass"]
 }),
 $globals.HLReferencesModel);
 

+ 1 - 1
src/Helios-References.st

@@ -371,7 +371,7 @@ updateClassesAndMetaclassesCache
 	self environment classes do: [ :each |
 		classesAndMetaclassesCache
 				add: each; 
-				add: each class ]
+				add: each theMetaClass ]
 !
 
 updateMethodsCache