don't leave # when there isn't a title
and while there ensure that there's an empty line following the document title. Signed-off-by: Justin Abrahms <justin@abrah.ms>
This commit is contained in:
parent
8bbc1c9f6d
commit
1e4cabf98a
16
ox-gemini.el
16
ox-gemini.el
@ -29,7 +29,6 @@
|
||||
;; TODO:
|
||||
;; Sublists aren't supported in gemini
|
||||
;; There's a trailing space after inline code samples
|
||||
;; If you don't have a title, it leaves a blank # in the gmi
|
||||
;; If you link a file to an absolute path, the links break
|
||||
;; bare links don't work (e.g. directly linking https://google.com
|
||||
;;
|
||||
@ -207,14 +206,13 @@ holding contextual information."
|
||||
"Return complete document string after GEMINI conversion.
|
||||
CONTENTS is the transcoded contents string. INFO is a plist
|
||||
holding export options."
|
||||
(concat
|
||||
;; Build title block.
|
||||
(format "# %s\n" (org-export-data
|
||||
(when (plist-get info :with-title) (plist-get info :title)) info))
|
||||
;; Document's body.
|
||||
contents))
|
||||
|
||||
|
||||
(let ((title (org-export-data (when (plist-get info :with-title)
|
||||
(plist-get info :title))
|
||||
info)))
|
||||
(concat
|
||||
(unless (string= title "")
|
||||
(format "# %s\n\n" title))
|
||||
contents)))
|
||||
|
||||
(defun org-gemini-export-to-buffer (&optional async subtreep visible-only body-only ext-plist)
|
||||
"Export an org file to a new buffer.
|
||||
|
Loading…
Reference in New Issue
Block a user