diff --git a/Makefile b/Makefile index c9bee2191a4fe23010fdd4970fb88644ed5d940d..948d25c2bc1fe68ff80f02f03cac19972d662b85 100644 --- a/Makefile +++ b/Makefile @@ -45,7 +45,7 @@ ELS := org-re-reveal.el ox-re-reveal.el CORTELS := $(TESTFILE) cort-test.el -REVEALTEST := extra-scripts highlightjs internal-links klipsify klipsify-python multiplex noslide options pdf-notes reveal-toc revealjs4 slide-numbers slide-numbers-toc slide-numbers-reveal-toc split title-slide +REVEALTEST := extra-scripts highlightjs internal-links klipsify klipsify-python multiplex noslide options pdf-notes reveal-toc revealjs4 slide-numbers slide-numbers-toc slide-numbers-reveal-toc split title-slide blockquote ################################################## diff --git a/org-re-reveal-tests.el b/org-re-reveal-tests.el index 82ee974316a2343a2fc6da76db701d08e95e7f1c..14f0f95b7e25fcb88bacb9094a3b72f401d63e9e 100644 --- a/org-re-reveal-tests.el +++ b/org-re-reveal-tests.el @@ -142,6 +142,7 @@ "slide-numbers-toc" "split" "title-slide" + "blockquote" )) ;; (provide 'org-re-reveal-tests) diff --git a/org-re-reveal.el b/org-re-reveal.el index 92d4a431d9921e5d781ae785c22fd79aec3b4b1f..7214e319267d58532f711d02d577e722ab419550 100644 --- a/org-re-reveal.el +++ b/org-re-reveal.el @@ -191,7 +191,6 @@ (setq info (plist-put info :reveal-mathjax t)) (org-html-latex-fragment frag contents info))) (plain-list . org-re-reveal-plain-list) - (quote-block . org-re-reveal-quote-block) (section . org-re-reveal-section) (src-block . org-re-reveal-src-block) (special-block . org-re-reveal-special-block) @@ -1986,20 +1985,6 @@ INFO is a plist holding contextual information. CONTENTS is unused." (org-re-reveal--frag-index findex) label code)))))))) -(defun org-re-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" - (let ((frag (org-re-reveal--frag-class - (org-export-read-attribute - :attr_reveal quote-block :frag) info))) - (if frag - (concat " " frag) - "")) - contents)) - - (defun org-re-reveal--auto-title-slide-template (info) "Generate the automatic title slide template with INFO." (let* ((spec (org-re-reveal-format-spec info)) diff --git a/test-cases/expect-blockquote.html b/test-cases/expect-blockquote.html new file mode 100644 index 0000000000000000000000000000000000000000..7b0c4cf6474279d1b1cba7ac243393506ed66e7d --- /dev/null +++ b/test-cases/expect-blockquote.html @@ -0,0 +1,82 @@ + + + + +