From 032dd10154b4c25a348abecc1cf18d655983c516 Mon Sep 17 00:00:00 2001 From: Yujie Wen Date: Wed, 3 Dec 2014 22:38:02 +0800 Subject: [PATCH] Add fragment support for quote block. --- ox-reveal.el | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/ox-reveal.el b/ox-reveal.el index d3e728f..787688d 100755 --- a/ox-reveal.el +++ b/ox-reveal.el @@ -82,6 +82,7 @@ (item . org-reveal-item) (keyword . org-reveal-keyword) (paragraph . org-reveal-paragraph) + (quote-block . org-reveal-quote-block) (section . org-reveal-section) (src-block . org-reveal-src-block) (template . org-reveal-template)) @@ -764,6 +765,14 @@ contextual information." (format " class=\"src src-%s\"" lang)) 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 "
\n%s
" + (frag-class (org-export-read-attribute :attr_reveal quote-block :frag)) + contents)) + (defun org-reveal-template (contents info) "Return complete document string after HTML conversion. contents is the transcoded contents string.