Merge pull request #39 from benley/example-block-src

Use triple-backtick block syntax for example blocks too
This commit is contained in:
Lars Tveito 2022-09-10 15:21:35 +02:00 committed by GitHub
commit 46faa67dbb
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -56,6 +56,7 @@
:translate-alist '((inner-template . org-gfm-inner-template) :translate-alist '((inner-template . org-gfm-inner-template)
(paragraph . org-gfm-paragraph) (paragraph . org-gfm-paragraph)
(strike-through . org-gfm-strike-through) (strike-through . org-gfm-strike-through)
(example-block . org-gfm-example-block)
(src-block . org-gfm-src-block) (src-block . org-gfm-src-block)
(table-cell . org-gfm-table-cell) (table-cell . org-gfm-table-cell)
(table-row . org-gfm-table-row) (table-row . org-gfm-table-row)
@ -92,6 +93,10 @@ channel."
(suffix "```")) (suffix "```"))
(concat prefix code suffix))) (concat prefix code suffix)))
;;;; Example Block
(defalias 'org-gfm-example-block #'org-gfm-src-block)
;;;; Strike-Through ;;;; Strike-Through
@ -284,7 +289,7 @@ holding export options."
(toc-string (or (mapconcat 'org-gfm-format-toc headlines "\n") "")) (toc-string (or (mapconcat 'org-gfm-format-toc headlines "\n") ""))
(toc-tail (if headlines "\n\n" ""))) (toc-tail (if headlines "\n\n" "")))
(org-trim (concat toc-string toc-tail contents "\n" (org-gfm-footnote-section info))))) (org-trim (concat toc-string toc-tail contents "\n" (org-gfm-footnote-section info)))))