lang/markdown: remove +pandoc
The new default for markdown-command will try pandoc, if it is available. This makes pandoc-mode redundant. The mode also doesn't quite belong to the markdown module.
This commit is contained in:
parent
a6ebd95aee
commit
4c9a3dd191
3 changed files with 2 additions and 12 deletions
|
@ -72,7 +72,8 @@ Returns its exit code."
|
||||||
(call-process-region beg end
|
(call-process-region beg end
|
||||||
shell-file-name nil output-buffer nil
|
shell-file-name nil output-buffer nil
|
||||||
shell-command-switch
|
shell-command-switch
|
||||||
"pandoc" "--smart" "-f" "markdown" "-t" "html")))
|
"pandoc" "-f" "markdown" "-t" "html"
|
||||||
|
"--standalone" "--mathjax" "--highlight-style=pygments")))
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +markdown-compile-markdown (beg end output-buffer)
|
(defun +markdown-compile-markdown (beg end output-buffer)
|
||||||
|
|
|
@ -66,10 +66,3 @@ capture, the end position, and the output buffer.")
|
||||||
"t" #'markdown-toc-generate-toc
|
"t" #'markdown-toc-generate-toc
|
||||||
"i" #'markdown-insert-image
|
"i" #'markdown-insert-image
|
||||||
"l" #'markdown-insert-link))))
|
"l" #'markdown-insert-link))))
|
||||||
|
|
||||||
|
|
||||||
(def-package! pandoc-mode
|
|
||||||
:when (featurep! +pandoc)
|
|
||||||
:commands pandoc-mode
|
|
||||||
:hook (markdown-mode . conditionally-turn-on-pandoc)
|
|
||||||
:init (setq markdown-command "pandoc --from=markdown --to=html --standalone --mathjax --highlight-style=pygments"))
|
|
||||||
|
|
|
@ -1,10 +1,6 @@
|
||||||
;; -*- lexical-binding: t; no-byte-compile: t; -*-
|
;; -*- lexical-binding: t; no-byte-compile: t; -*-
|
||||||
;;; lang/markdown/doctor.el
|
;;; lang/markdown/doctor.el
|
||||||
|
|
||||||
(when (featurep! +pandoc)
|
|
||||||
(unless (executable-find "pandoc")
|
|
||||||
(warn! "Couldn't find pandoc, markdown-mode may have issues")))
|
|
||||||
|
|
||||||
(when (require 'markdown-mode nil t)
|
(when (require 'markdown-mode nil t)
|
||||||
(cond ((eq markdown-command #'+markdown-compile)
|
(cond ((eq markdown-command #'+markdown-compile)
|
||||||
(dolist (cmd (list (cons "marked" '+markdown-compile-marked)
|
(dolist (cmd (list (cons "marked" '+markdown-compile-marked)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue