hellmund
/
markdown-preview-mode
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Extract template path for use.

This commit is contained in:
jenchieh 2020-08-30 18:41:48 +08:00
parent f98d9114ca
commit f7170ce84e
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
markdown-preview-mode.el
View File

@ -101,6 +101,10 @@
(defvar markdown-preview--home-dir (file-name-directory load-file-name)
"`markdown-preview-mode' home directory.")
(defvar markdown-preview--preview-template
(expand-file-name "preview.html" markdown-preview--home-dir)
"`markdown-preview-mode' html preview template.")
(defvar markdown-preview--idle-timer nil
"Preview idle timer.")
@ -144,7 +148,7 @@
(defun markdown-preview--read-preview-template (preview-uuid preview-file)
"Read preview template and writes identified by PREVIEW-UUID rendered copy to PREVIEW-FILE, ready to be open in browser."
(with-temp-file preview-file
(insert-file-contents (expand-file-name "preview.html" markdown-preview--home-dir))
(insert-file-contents markdown-preview--preview-template)
(when (search-forward "${MD_STYLE}" nil t)
(replace-match (markdown-preview--css) t))
(when (search-forward "${MD_JS}" nil t)