@@ -390,7 +390,8 @@

       (is-spell-list? x) [spell-list-panel x]

       (is-spell? x) (spell-panel x)

       (is-equipment? x) [equipment-panel x]

-      (is-error? x) [error-message x])])

+      (is-error? x) [error-message x]

+      :else [error-message {:err (str "cannot display result: " x)}])])

 (defn history []

   (let [history (re-frame/subscribe [::subs/cmd-history])]