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

Use #+name: to add names to exported code blocks.

Browse Source
This commit is contained in:
cnngimenez 2022-01-10 11:58:14 -03:00
parent 149c38ebf3
commit 3f1aabc140
1 changed files with 7 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
ox-gemini.el
View File

@ -68,11 +68,13 @@
;; there's a bug here where there's a trailing space in the `` ;; there's a bug here where there's a trailing space in the ``
(format "`%s`" (org-export-format-code-default input info))) (format "`%s`" (org-export-format-code-default input info)))
(defun org-gemini-code-block (example-block _contents info) (defun org-gemini-code-block (src-block _contents info)
"EXAMPLE-BLOCK is a codeblock. INFO is a plist." "SRC-BLOCK is a codeblock. INFO is a plist."
(let ((name (org-element-property :name src-block)))
(org-remove-indentation (org-remove-indentation
(format "```\n%s```" (format "```%s\n%s```"
(org-export-format-code-default example-block info)))) (or name "")
(org-export-format-code-default src-block info)))))
(defun org-gemini--describe-links (links _width info) (defun org-gemini--describe-links (links _width info)
"Describe links is the footer-portion of the link data. "Describe links is the footer-portion of the link data.