feat: subscript superscript

doerg/src/net/deertopia/doerg/render.clj

@@ -201,6 +201,12 @@
 (defmethod org-element "bold" [{:keys [children]}]
   [:b children])
 
+(defmethod org-element "subscript" [{:keys [children]}]
+  [:sub children])
+
+(defmethod org-element "superscript" [{:keys [children]}]
+  [:super children])
+
 (defmethod org-element "italic" [{:keys [children]}]
   [:em children])
 

doerg/src/net/deertopia/doerg/repl.clj

@@ -12,8 +12,9 @@
   "/home/msyds/org/20251228003307-prerequisite_context_in_korean.org"
   #_
   "/home/msyds/org/20250919114912-homepage.org"
-  ;; #_
-  "/home/msyds/org/20251111182118-path_induction.org")
+  #_
+  "/home/msyds/org/20251111182118-path_induction.org"
+  "/home/msyds/org/20250512144715-natural_transformation_category_theory.org")
 
 (defn- force-create-sym-link [path target]
   (fs/delete-if-exists path)