[elpa] externals/lentic 9b556df984 312/333: Add support for additional files for HTML export

[ELPA Syncer]

branch: externals/lentic
commit 9b556df984dd9e4abb25fa9be0cc5719db68ce1b
Author: Phillip Lord <phillip.lord@russet.org.uk>
Commit: Phillip Lord <phillip.lord@russet.org.uk>

    Add support for additional files for HTML export
---
 lentic-doc.el | 12 ++++++++++++
 lentic.el     |  1 +
 2 files changed, 13 insertions(+)

diff --git a/lentic-doc.el b/lentic-doc.el
index b08d43f751..eb53728e52 100644
--- a/lentic-doc.el
+++ b/lentic-doc.el
@@ -160,7 +160,19 @@ EXT must not be nil or empty."
    (lentic-doc-package-start-source package)
    "html"))
 
+
+(defvar lentic-doc-allowed-files nil)
+
+(defun lentic-doc-ensure-allowed-html (package)
+  (let ((var (intern (concat package "-doc-html-files"))))
+    (if (boundp var)
+        (mapc
+         (lambda (f)
+           (add-to-list 'lentic-doc-allowed-files f))
+         (symbol-value var)))))
+
 (defun lentic-doc-ensure-doc (package)
+  (lentic-doc-ensure-allowed-html package)
   (unless (f-exists?
            (lentic-doc-package-doc-file package))
     (lentic-doc-htmlify-package package)))
diff --git a/lentic.el b/lentic.el
index fdb24f618d..9857f706f1 100644
--- a/lentic.el
+++ b/lentic.el
@@ -157,6 +157,7 @@
 (require 'f)
 
 (defvar lentic-doc "lenticular.org")
+(defvar lentic-doc-html-files '("lenticular.css"))
 ;; #+end_src
 
 ;; ** State