From b0d62ccdd3795a0b879be700317b1053b58e5f8f Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Sun, 30 Mar 2025 03:06:37 +0100
Subject: Add pdf link type.

* ennum-html.el (ennum-html-export-pdf): New function.
(org-link-parameters): Add pdf.
* ennum.el (ennum-setting): Add :pdf-width and :pdf-height settings.
(ennum-publish-link): Add pdf link type.
---
 ennum-html.el | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

(limited to 'ennum-html.el')

diff --git a/ennum-html.el b/ennum-html.el
index 5198a80..7e3eacb 100644
--- a/ennum-html.el
+++ b/ennum-html.el
@@ -372,6 +372,21 @@
  "video"
  :follow 'ennum-html-follow-video)
 
+(defun ennum-html-export-pdf (path desc backend)
+  (pcase backend
+    ((or 'ennum-html 'html)
+     (xmlgen
+      (let ((link-path (url-encode-url
+                        (expand-file-name* path (ennum-setting :static-directory)))))
+        `(object :data ,link-path
+                 :type "application/pdf"
+                 :width ,(ennum-setting :pdf-width)
+                 :height ,(ennum-setting :pdf-height)
+                 "Download " (a :href ,link-path ,path)))))))
+
+(org-link-set-parameters
+ "pdf" :export 'ennum-html-export-pdf)
+
 (defun ennum-html-export-static (path desc backend)
   (pcase backend
     ((or 'ennum-html 'html)
-- 
cgit v1.2.3