# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1563429581 -7200
# Node ID d21d7081d67740bc9cc39e27d079ffbc1657d233
# Parent  458a1ac0701dc377f0136e14e0aceb3159dfa531
#BUGFIX by cg
class: Explainer class
changed: #explainMessageNode:in:forClass:short:interval:

diff -r 458a1ac0701d -r d21d7081d677 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