leave a blank line after the link blocks
Signed-off-by: Justin Abrahms <justin@abrah.ms>
This commit is contained in:
parent
4572682a99
commit
8bbc1c9f6d
@ -83,6 +83,7 @@
|
|||||||
"Describe links is the footer-portion of the link data.
|
"Describe links is the footer-portion of the link data.
|
||||||
|
|
||||||
It's output just before each section. LINKS is a list of each link. INFO is a plist."
|
It's output just before each section. LINKS is a list of each link. INFO is a plist."
|
||||||
|
(concat
|
||||||
(mapconcat
|
(mapconcat
|
||||||
(lambda (link)
|
(lambda (link)
|
||||||
(let* ((raw-path (org-element-property :raw-link link))
|
(let* ((raw-path (org-element-property :raw-link link))
|
||||||
@ -97,7 +98,9 @@ It's output just before each section. LINKS is a list of each link. INFO is a
|
|||||||
(or desc (org-element-property :raw-link link))
|
(or desc (org-element-property :raw-link link))
|
||||||
info)))
|
info)))
|
||||||
(format "=> %s %s\n" path anchor)))
|
(format "=> %s %s\n" path anchor)))
|
||||||
links ""))
|
links "")
|
||||||
|
(when (car links)
|
||||||
|
"\n")))
|
||||||
|
|
||||||
|
|
||||||
(defun org-gemini-link (_link desc _info)
|
(defun org-gemini-link (_link desc _info)
|
||||||
|
Loading…
Reference in New Issue
Block a user