--- a/Workspace.st	Thu Jan 30 12:49:48 2020 +0100
+++ b/Workspace.st	Thu Jan 30 12:50:38 2020 +0100
@@ -2542,12 +2542,14 @@
      an actionBlock. Evaluate it.
      Used by the inspector to provide detail about errors"
 
-    |t emphasisAction|
+    |t emphasis emphasisAction|
 
     t := (self textFromLine:cursorLine col:cursorCol toLine:cursorLine col:cursorCol) asString.
     t isText ifTrue:[
-        (emphasisAction := Text actionBlockFromEmphasis:(t emphasisAt:1)) notNil ifTrue:[
-            emphasisAction value.
+        (emphasis := t emphasisAt:1) notNil ifTrue:[
+            (emphasisAction := Text actionBlockFromEmphasis:emphasis) notNil ifTrue:[
+                emphasisAction value.
+            ].    
         ].    
     ].