#BUGFIX by cg
authorClaus Gittinger <cg@exept.de>
Thu, 18 Jul 2019 07:59:41 +0200
changeset 4459 d21d7081d677
parent 4458 458a1ac0701d
child 4460 54ff9d1c05bd
#BUGFIX by cg class: Explainer class changed: #explainMessageNode:in:forClass:short:interval:
Explainer.st
--- a/Explainer.st	Mon Jul 15 15:38:51 2019 +0200
+++ b/Explainer.st	Thu Jul 18 07:59:41 2019 +0200
@@ -289,7 +289,7 @@
         clsName := implClass name.
         clsName := self asLink:clsName to:(self actionToBrowseClass:implClass selector:selector).
         "/ info := '%1 » %2' bindWith:clsName "allBold" with:selectorString.
-        info := '%1 %2' bindWith:clsName with:implMethod methodDefinitionTemplate.
+        info := '%1 %2' bindWith:clsName with:(implMethod methodDefinitionTemplateForSelector:selector).
         info := self asLink:info to:(action1 := self actionToBrowseClass:implClass selector:selector info:nil).
         
         redefiningClasses size ~~ 0 ifTrue:[
@@ -364,7 +364,7 @@
     ^ info
 
     "Modified: / 30-04-2016 / 17:08:11 / cg"
-    "Modified: / 25-06-2019 / 10:15:29 / Claus Gittinger"
+    "Modified: / 18-07-2019 / 07:51:21 / Claus Gittinger"
 !
 
 explainMethodNode:node in:code forClass:cls short:short interval:intervalIfKnown