use meta to detect returned result from eval-result are hiccup vector

pull/7364/head
Darwis 2022-11-16 16:32:15 +08:00 committed by Gabriel Horner
parent 66f7656fd8
commit c4604c9254
1 changed files with 1 additions and 1 deletions

View File

@ -38,4 +38,4 @@
[:div.results.mt-1
(let [editor-ns {'block (sci/new-var 'block block)}
result (eval-string code {'editor editor-ns})]
(if (and (vector? result) (keyword? (first result))) result [:pre.code (str result)]))]])
(if (and (vector? result) (:hiccup (meta result))) result [:pre.code (str result)]))]])