mirror of https://github.com/yjwen/org-reveal.git
Add fragment support for quote block.
This commit is contained in:
parent
08db194120
commit
032dd10154
|
@ -82,6 +82,7 @@
|
||||||
(item . org-reveal-item)
|
(item . org-reveal-item)
|
||||||
(keyword . org-reveal-keyword)
|
(keyword . org-reveal-keyword)
|
||||||
(paragraph . org-reveal-paragraph)
|
(paragraph . org-reveal-paragraph)
|
||||||
|
(quote-block . org-reveal-quote-block)
|
||||||
(section . org-reveal-section)
|
(section . org-reveal-section)
|
||||||
(src-block . org-reveal-src-block)
|
(src-block . org-reveal-src-block)
|
||||||
(template . org-reveal-template))
|
(template . org-reveal-template))
|
||||||
|
@ -764,6 +765,14 @@ contextual information."
|
||||||
(format " class=\"src src-%s\"" lang))
|
(format " class=\"src src-%s\"" lang))
|
||||||
label code))))))
|
label code))))))
|
||||||
|
|
||||||
|
(defun org-reveal-quote-block (quote-block contents info)
|
||||||
|
"Transcode a QUOTE-BLOCK element from Org to Reveal.
|
||||||
|
CONTENTS holds the contents of the block INFO is a plist holding
|
||||||
|
contextual information."
|
||||||
|
(format "<blockquote %s>\n%s</blockquote>"
|
||||||
|
(frag-class (org-export-read-attribute :attr_reveal quote-block :frag))
|
||||||
|
contents))
|
||||||
|
|
||||||
(defun org-reveal-template (contents info)
|
(defun org-reveal-template (contents info)
|
||||||
"Return complete document string after HTML conversion.
|
"Return complete document string after HTML conversion.
|
||||||
contents is the transcoded contents string.
|
contents is the transcoded contents string.
|
||||||
|
|
Loading…
Reference in New Issue