From c4e794498e8186a9946d2c3a882afe3007578483 Mon Sep 17 00:00:00 2001
From: Lucien Cartier-Tilet <lucien@phundrak.com>
Date: Wed, 22 Jun 2022 11:07:13 +0200
Subject: [PATCH] [ol-conlang] Add conlang-md formating for dictionary links

---
 ol-conlang.el | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/ol-conlang.el b/ol-conlang.el
index cc2dc53..6f356ab 100644
--- a/ol-conlang.el
+++ b/ol-conlang.el
@@ -34,7 +34,7 @@
 (require 'ol)
 (require 'org-element)
 
-(defun org-link-conlang-open (path arg)
+(defun org-link-conlang-open (path _arg)
   "Open a conlang dictionary link.
 PATH is the path to a word or a language, as a string."
   (let* ((destructured-path (split-string path ":"))
@@ -86,6 +86,15 @@ containing the export paramenters."
       (if (not desc)
           (format "@uref{%s}" generic-uri)
         (format "@urif{%s, %s}" generic-uri desc)))
+     (`conlang-md
+      (format "<Dictionary lang=\"%s\" %s%s/>"
+              language
+              (if word
+                  (format "word=\"%s\" " word)
+                "")
+              (if desc
+                  (format "desc=\"%s\" " desc)
+                "")))
      (_ generic-uri))))
 
 (org-link-set-parameters "conlang"