quote-block export: multiple lines should start with ">".

Using some ox-md.el code to fix this.
This commit is contained in:
cnngimenez 2022-01-10 03:33:40 -03:00
parent b69e7418fd
commit 149c38ebf3

View File

@ -59,7 +59,9 @@
(defun org-gemini-quote-block (_input contents _info) (defun org-gemini-quote-block (_input contents _info)
"CONTENTS is the text of the quote." "CONTENTS is the text of the quote."
(format "> %s " contents)) (replace-regexp-in-string
"^" "> "
(replace-regexp-in-string "\n\\'" "" contents)))
(defun org-gemini-code-inline (input _contents info) (defun org-gemini-code-inline (input _contents info)
"INPUT is either a 'src-block' or 'example-block' element. INFO is a plist." "INPUT is either a 'src-block' or 'example-block' element. INFO is a plist."