diff --git a/collects/macro-debugger/view/term-record.ss b/collects/macro-debugger/view/term-record.ss
index 3331225..7e88593 100644
--- a/collects/macro-debugger/view/term-record.ss
+++ b/collects/macro-debugger/view/term-record.ss
@@ -480,7 +480,7 @@
                              (protostep-definites step)
                              (protostep-frontier step))
         (separator step)
-        (send sbview add-text (exn-message (misstep-exn step)))
+        (send sbview add-error-text (exn-message (misstep-exn step)))
         (send sbview add-text "\n")
         (when (exn:fail:syntax? (misstep-exn step))
           (for-each (lambda (e) (send sbview add-syntax e