From 5bca7890c4ba729da84e5dd4f29ef49b51110de6 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Madeleine=20Sydney=20=C5=9Alaga?= <msyds@deertopia.net>
Date: Thu, 19 Mar 2026 15:45:29 -0600
Subject: [PATCH] feat: css hyphenation

---
 doerg/resources/net/deertopia/doerg/tuftesque.css | 1 +
 doerg/src/net/deertopia/doerg/render.clj          | 6 +++++-
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/doerg/resources/net/deertopia/doerg/tuftesque.css b/doerg/resources/net/deertopia/doerg/tuftesque.css
index 3291395..4dbaa6e 100644
--- a/doerg/resources/net/deertopia/doerg/tuftesque.css
+++ b/doerg/resources/net/deertopia/doerg/tuftesque.css
@@ -115,6 +115,7 @@ p {
     margin-bottom: 1.4rem;
     padding-right: 0;
     vertical-align: baseline;
+    hyphens: auto;
 }
 
 /* Chapter Epigraphs */
diff --git a/doerg/src/net/deertopia/doerg/render.clj b/doerg/src/net/deertopia/doerg/render.clj
index 775f0f8..d97b2be 100644
--- a/doerg/src/net/deertopia/doerg/render.clj
+++ b/doerg/src/net/deertopia/doerg/render.clj
@@ -56,6 +56,10 @@
                  (lr/error e "Error in renderer" {:node node})
                  (render-renderer-error e)))))))
 
+(def default-language
+  "Default language, used in the lang attribute of the body tag."
+  "en")
+
 (defn org-document
   "Recursively render an Org-mode document to Hiccup."
   [doc]
@@ -66,7 +70,7 @@
        [:head
         [:title "org document"]
         doerg-html/head]
-       [:body
+       [:body {:lang default-language}
         [:article
          rendered]]])))