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

Trying again...

This commit is contained in:
j4nk 2023-07-10 09:15:41 -04:00
parent 58facddf57
commit 76e1ac1dda
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
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 "^@@DIV" line) (md4tj-begin-tag "div" (list (list "class" (nth 1 (split-string line))))))
((string-match "^@@ENDDIV" line) (md4tj-end-tag "div")) ((string-match "^@@ENDDIV" line) (md4tj-end-tag "div"))
((string-match "^@@BLOGINSERT" line) (with-current-buffer inbuf (md4tj-blog-html))) ((string-match "^@@BLOGINSERT" line) (with-current-buffer inbuf (md4tj-blog-html)))
((string-match "^@@RSSINSERT" line) (md4tj-rss-link-string (concat (md4tj-blog-base-dir) "feed.xml"))) ((string-match "^@@RSSINSERT" line) (md4tj-rss-link-string (concat (md4tj-blog-base-url) "feed.xml")))
((and (string-match "^$$.*$$" line) (eq (nth 1 state) 'normal)) ;; LaTeX formula ((and (string-match "^$$.*$$" line) (eq (nth 1 state) 'normal)) ;; LaTeX formula
(shell-command (concat "./pnglatex" (shell-command (concat "./pnglatex"
" -d 300" " -d 300"
@ -454,7 +454,7 @@
(defun md4tj-rss-file-from-outfile (outfile subdir) (defun md4tj-rss-file-from-outfile (outfile subdir)
"Return the filename that the RSS XML should be output to given OUTFILE." "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) "/" subdir "/" "feed.xml"))