\n\n"
+ (org-html--make-attribute-string
+ `(:id ,(concat org-reveal-slide-id-head
+ preferred-id
+ (if for-split "-split" ""))
+ :class ,(org-element-property :HTML_CONTAINER_CLASS headline)
+ :data-transition ,(org-element-property :REVEAL_DATA_TRANSITION headline)
+ :data-state ,(org-element-property :REVEAL_DATA_STATE headline)
+ :data-background-iframe ,slide-background-iframe))
+ (concat
+ "style=\""
+ (let ((attr (or (org-element-property :REVEAL_BACKGROUND headline)
+ default-slide-background)))
+ (if (org-reveal-is-background-img attr)
+ (format "background-image: url('%s'); " attr)
+ (if-format "background: %s; " attr)))
+ (let ((attr (or (org-element-property :REVEAL_BACKGROUND_REPEAT headline)
+ default-slide-background-repeat)))
+ (if-format "background-repeat: %s; " attr))
+ (let ((attr (or (org-element-property :REVEAL_BACKGROUND_SIZE headline)
+ default-slide-background)))
+ (if-format "background-size: %s; " attr))
+ (let ((attr (or (org-element-property :REVEAL_BACKGROUND_POSITION headline)
+ default-slide-background)))
+ (if-format "position: %s; " attr))
+ (let ((attr (or (org-element-property :REVEAL_BACKGROUND_OPACITY headline)
+ default-slide-background)))
+ (if-format "opacity: %s; " attr))
+ (let ((extra-attrs (org-element-property :REVEAL_EXTRA_ATTR headline)))
+ (if-format "%s;" extra-attrs))
+ "\""))
+ (format "\n"
+ (org-html--make-attribute-string
+ `(:id ,(concat org-reveal-slide-id-head
+ preferred-id
+ (if for-split "-split" ""))
+ :class ,(org-element-property :HTML_CONTAINER_CLASS headline)
+ :data-transition ,(org-element-property :REVEAL_DATA_TRANSITION headline)
+ :data-state ,(org-element-property :REVEAL_DATA_STATE headline)
+ :data-background ,(or (org-element-property :REVEAL_BACKGROUND headline)
+ default-slide-background)
+ :data-background-size ,(or (org-element-property :REVEAL_BACKGROUND_SIZE headline)
+ default-slide-background-size)
+ :data-background-position ,(or (org-element-property :REVEAL_BACKGROUND_POSITION headline)
+ default-slide-background-position)
+ :data-background-repeat ,(or (org-element-property :REVEAL_BACKGROUND_REPEAT headline)
+ default-slide-background-repeat)
+ :data-background-transition ,(or (org-element-property :REVEAL_BACKGROUND_TRANS headline)
+ default-slide-background-transition)
+ :data-background-opacity
+ ,(or (org-element-property :REVEAL_BACKGROUND_OPACITY headline)
+ (plist-get info :reveal-default-slide-background-opacity))))
+ (let ((extra-attrs (org-element-property :REVEAL_EXTRA_ATTR headline)))
+ (if-format " %s" extra-attrs))))))
;; Copied from org-html-headline and modified to embed org-reveal
;; specific attributes.
@@ -483,7 +525,11 @@ holding contextual information."
(concat
;; Slide footer if any
footer-div
- "\n\n")))))))
+ (if (org-element-property :REVEAL_BACKGROUND_IFRAME headline)
+ "
")
+ "\n