SmallSense__Manager.st
changeset 181 cd22fe147eb4
parent 179 e444be9de40a
child 249 8bc64027b189
--- a/SmallSense__Manager.st	Sat Mar 08 16:04:19 2014 +0000
+++ b/SmallSense__Manager.st	Tue Mar 18 12:29:58 2014 +0000
@@ -102,14 +102,21 @@
     ].
 
     what == #methodInClass ifTrue:[
-        self updateInfoForMethod: (param first >> param second).
+        "/ If this is anonymous class, do not bother...        
+
+        | nm |
+
+        nm := param first name.
+        (nm isSymbol and:[ Smalltalk includesKey: nm ]) ifTrue:[
+            self updateInfoForMethod: (param first >> param second).
+        ].
         ^self.
     ].
     
 
 "/    Transcript show: 'SmallSense: Smalltalk changed: ', what , ' with: ', param printString.
 
-    "Modified: / 04-02-2012 / 22:30:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 18-03-2014 / 12:27:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !Manager methodsFor:'initialization'!