j4nk
/
md4tj
1
0
Fork 0
Code Issues 8 Pull Requests Projects Releases Wiki Activity

Possibly fixed the path issues, still need to test

This commit is contained in:
j4nk 2023-07-10 09:10:52 -04:00
parent 3f56c251cd
commit 58facddf57
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
md4tj.el
View File

@ -106,7 +106,7 @@
((string-match "^@@DIV" line) (md4tj-begin-tag "div" (list (list "class" (nth 1 (split-string line))))))
((string-match "^@@ENDDIV" line) (md4tj-end-tag "div"))
((string-match "^@@BLOGINSERT" line) (with-current-buffer inbuf (md4tj-blog-html)))
((string-match "^@@RSSINSERT" line) (md4tj-rss-link-string (md4tj-rss-file-from-outfile outfile)))
((string-match "^@@RSSINSERT" line) (md4tj-rss-link-string (concat (md4tj-blog-base-dir) "feed.xml")))
((and (string-match "^$$.*$$" line) (eq (nth 1 state) 'normal)) ;; LaTeX formula
(shell-command (concat "./pnglatex"
" -d 300"
@ -236,7 +236,7 @@
(insert-file-contents mdfile)
(goto-char (point-min))
;; If we need RSS, go ahead and output the XML file here
(if (md4tj-rss-needs-rss) (md4tj-rss-to-file mdfile (md4tj-rss-file-from-outfile outfile)))
(if (md4tj-rss-needs-rss) (md4tj-rss-to-file mdfile (md4tj-rss-file-from-outfile outfile (with-temp-buffer (insert-file-contents mdfile) (md4tj-blog-base-dir)))))
(set-buffer outbuf)
(insert (md4tj-begin))
(insert (with-current-buffer inbuf (md4tj-head)))
@ -452,9 +452,9 @@
"Return the html of RSS link to RSSLINK as string."
(concat (md4tj-begin-tag "div" (list (list "id" "rssicon"))) (md4tj-begin-tag "a" (list (list "href" rsslink))) (md4tj-begin-tag "img" (list (list "src" "rss.png") (list "alt" "RSS icon") (list "style" "width:20px;height:20px;"))) (md4tj-end-tag "img") (md4tj-end-tag "a") (md4tj-end-tag "div")))
(defun md4tj-rss-file-from-outfile (outfile)
(defun md4tj-rss-file-from-outfile (outfile subdir)
"Return the filename that the RSS XML should be output to given OUTFILE."
(concat (file-name-directory outfile) "/feed.xml"))
(concat (file-name-directory outfile) "feed.xml"))