Org: Use utf-8 symbols in Markdown export
HTML-escaped is more correct, but works in less places that I'm pasting markdown.
This commit is contained in:
parent
433d98ccb4
commit
601cc0d1e6
25
config.org
25
config.org
|
@ -7156,20 +7156,25 @@ and push them onto the =md= transcoders alist.
|
||||||
(org-html-latex-environment latex-environment contents info)
|
(org-html-latex-environment latex-environment contents info)
|
||||||
"$$\n"))
|
"$$\n"))
|
||||||
|
|
||||||
|
(defun org-utf8-entity (entity _contents _info)
|
||||||
|
"Transcode an ENTITY object from Org to utf-8.
|
||||||
|
CONTENTS are the definition itself. INFO is a plist holding
|
||||||
|
contextual information."
|
||||||
|
(org-element-property :utf-8 entity))
|
||||||
|
|
||||||
;; We can't let this be immediately parsed and evaluated,
|
;; We can't let this be immediately parsed and evaluated,
|
||||||
;; because eager macro-expansion tries to call as-of-yet
|
;; because eager macro-expansion tries to call as-of-yet
|
||||||
;; undefined functions.
|
;; undefined functions.
|
||||||
|
;; NOTE in the near future this shouldn't be required
|
||||||
(eval
|
(eval
|
||||||
'(let ((md-latex-frag '(latex-fragment . org-md-latex-fragment))
|
'(dolist (extra-transcoder
|
||||||
(md-latex-env '(latex-environment . org-md-latex-environment))
|
'((latex-fragment . org-md-latex-fragment)
|
||||||
(md-transcoders (org-export-backend-transcoders
|
(latex-environment . org-md-latex-environment)
|
||||||
(org-export-get-backend 'md))))
|
(entity . org-utf8-entity)))
|
||||||
(unless (member md-latex-frag md-transcoders)
|
(unless (member extra-transcoder (org-export-backend-transcoders
|
||||||
(push md-latex-frag (org-export-backend-transcoders
|
(org-export-get-backend 'md)))
|
||||||
(org-export-get-backend 'md))))
|
(push extra-transcoder (org-export-backend-transcoders
|
||||||
(unless (member md-latex-env md-transcoders)
|
(org-export-get-backend 'md)))))))
|
||||||
(push md-latex-env (org-export-backend-transcoders
|
|
||||||
(org-export-get-backend 'md)))))))
|
|
||||||
#+end_src
|
#+end_src
|
||||||
|
|
||||||
*** Babel
|
*** Babel
|
||||||
|
|
Loading…
Reference in a new issue