#BUGFIX by cg
class: Explainer class
changed: #explainMessageNode:in:forClass:short:interval:
--- 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