From 71163b9bb5ccd220315d8492d249d570f8c38817 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Madeleine=20Sydney=20=C5=9Alaga?= Date: Thu, 26 Feb 2026 13:07:02 -0700 Subject: [PATCH] AAAAAA xelatex --- .../net/deertopia/doerg/preview-template.tex | 2 +- doerg/src/net/deertopia/doerg/render.clj | 28 +++++++++---------- 2 files changed, 14 insertions(+), 16 deletions(-) diff --git a/doerg/resources/net/deertopia/doerg/preview-template.tex b/doerg/resources/net/deertopia/doerg/preview-template.tex index a7c93db..9ecc15a 100644 --- a/doerg/resources/net/deertopia/doerg/preview-template.tex +++ b/doerg/resources/net/deertopia/doerg/preview-template.tex @@ -3,7 +3,7 @@ \usepackage[active,tightpage,auctex,dvips]{preview} \usepackage{fontspec} \usepackage{ifxetex} -%% \usepackage{syd-plex} +\usepackage{syd-plex} \begin{document} \setlength\abovedisplayskip{0pt} diff --git a/doerg/src/net/deertopia/doerg/render.clj b/doerg/src/net/deertopia/doerg/render.clj index 1216e07..3b78d1c 100644 --- a/doerg/src/net/deertopia/doerg/render.clj +++ b/doerg/src/net/deertopia/doerg/render.clj @@ -146,19 +146,17 @@ ;; the SVG tag, and set the new values for height and ;; vertical-align in the style attribute ;; • Viewbox: Must be removed entirely for correct positioning. - (let [r (-> (slurp file) - (str/replace-first "" "") - (str/replace-first #" height=['\"][^\"']+[\"']" "") - (str/replace-first #" width=['\"][^\"']+[\"']" "") - (str/replace-first - #"viewBox=['\"][^\"']+[\"']" - (fn [s] - (format "%s style=\"%s\"" - s - (format "height:%.4fem;vertical-align:%.4fem;display:inline-block" - height (- depth))))))] - (spit (fs/file "/tmp" (fs/file-name file)) r) - r)) + (-> (slurp file) + (str/replace-first "" "") + (str/replace-first #" height=['\"][^\"']+[\"']" "") + (str/replace-first #" width=['\"][^\"']+[\"']" "") + (str/replace-first + #"viewBox=['\"][^\"']+[\"']" + (fn [s] + (format "%s style=\"%s\"" + s + (format "height:%.4fem;vertical-align:%.4fem;display:inline-block" + height (- depth))))))) (defn- render-tex-snippets [doc] (let [promises (atom []) @@ -346,11 +344,11 @@ (defmethod org-element "latex-fragment" [{:keys [contents value] :as e}] [:span.latex-fragment - (-> e ::rendered (deref 2000 "«timed out»"))]) + (-> e ::rendered (deref #_#_ 2000 "«timed out»"))]) (defmethod org-element "latex-environment" [{:keys [value] :as e}] [:span.latex-fragment - (-> e ::rendered (deref 2000 "«timed out»"))]) + (-> e ::rendered (deref #_#_ 2000 "«timed out»"))]) (defmethod org-element "example-block" [{:keys [value]}] [:pre value])