Tools__NewSystemBrowser.st
changeset 16421 c83862865c5e
parent 16420 2ef865fc4243
child 16425 ab52342d5f86
--- a/Tools__NewSystemBrowser.st	Wed May 04 09:23:44 2016 +0200
+++ b/Tools__NewSystemBrowser.st	Wed May 04 09:25:26 2016 +0200
@@ -58036,12 +58036,12 @@
     "get something about aMethod
      to be shown in the info line at the bottom"
 
-    |msg msg2 method|
+    |msg msg2 method wrapper|
 
     method := aMethod.
     method isNil ifTrue:[ ^ nil ].
-    method wrapper notNil ifTrue:[
-        method := method wrapper
+    (wrapper := method wrapper) notNil ifTrue:[
+        method := wrapper
     ].
     method isNil ifTrue:[
         ^ 'oops - this method is not attached to any class'.