diff --git a/doerg/src/net/deertopia/doerg/render.clj b/doerg/src/net/deertopia/doerg/render.clj index b02b9eb..2820086 100644 --- a/doerg/src/net/deertopia/doerg/render.clj +++ b/doerg/src/net/deertopia/doerg/render.clj @@ -1,5 +1,6 @@ (ns net.deertopia.doerg.render (:require [net.deertopia.doerg.element :as element] + [clojure.stacktrace] [clojure.tools.logging :as l] [clojure.tools.logging.readable :as lr] [net.deertopia.doerg.html :as doerg-html] @@ -71,4 +72,15 @@ (defn- renderer-error "Render a `Throwable` to display within the document." [e] - "aaaa an error!") + [:details + [:summary "Renderer error!"] + [:div + [:samp {:style {:overflow "scroll" + :display "block" + :white-space "pre"}} + (with-out-str + (clojure.stacktrace/print-stack-trace e))]]]) + +(defmethod org-element "org-data" + [{:keys [children]}] + children)