phundrak/ox-gemini
1
0
Fork 0
Code Issues 3 Pull Requests Packages Projects Releases Wiki Activity

Merge

Browse Source
This commit is contained in:
cnngimenez 2022-01-10 19:12:19 -03:00
commit 527ce87206
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ox-gemini.el
View File

@ -116,7 +116,7 @@ Note: the footer with the actual links are handled in
"Transcode a SECTION element from Org to GEMINI. "Transcode a SECTION element from Org to GEMINI.
CONTENTS is the contents of the section. INFO is a plist holding CONTENTS is the contents of the section. INFO is a plist holding
contextual information." contextual information."
;; CONTENTS is nil when the section has no text but it has properties setted. ;; CONTENTS is nil when the section has no text but it has properties setted.
(let ((contents-str (or contents "")) ;; ensure that contents is a string. (let ((contents-str (or contents "")) ;; ensure that contents is a string.
(links (links
(and (plist-get info :ascii-links-to-notes) (and (plist-get info :ascii-links-to-notes)
@ -128,7 +128,7 @@ contextual information."
info)))) info))))
(org-remove-indentation (org-remove-indentation
(if (not (org-string-nw-p links)) contents-str (if (not (org-string-nw-p links)) contents-str
(concat (org-element-normalize-string contents-str) "\n\n" links)) (concat (org-element-normalize-string contents-str) "\n\n" links))
;; Do not apply inner margin if parent headline is low level. ;; Do not apply inner margin if parent headline is low level.
(let ((headline (org-export-get-parent-headline section))) (let ((headline (org-export-get-parent-headline section)))
(if (or (not headline) (org-export-low-level-p headline info)) 0 (if (or (not headline) (org-export-low-level-p headline info)) 0