diff options
author | Rick Frankel <rick@rickster.com> | 2013-03-12 17:10:30 -0400 |
---|---|---|
committer | Rick Frankel <rick@rickster.com> | 2013-03-16 15:17:44 -0400 |
commit | 243c4618416cf32bb386590509cc7661d1667776 (patch) | |
tree | 5ea00ada25902cbe7fb2a71c1c0f93ae44f36723 | |
parent | 60830fa4d27c2b86573b0829865c8555b3d76385 (diff) | |
download | org-mode-243c4618416cf32bb386590509cc7661d1667776.tar.gz |
whitespce cleanup
-rw-r--r-- | contrib/lisp/ox-deck.el | 46 |
1 files changed, 23 insertions, 23 deletions
diff --git a/contrib/lisp/ox-deck.el b/contrib/lisp/ox-deck.el index c0e7260..27d4f90 100644 --- a/contrib/lisp/ox-deck.el +++ b/contrib/lisp/ox-deck.el @@ -92,7 +92,7 @@ modernizr; core, extensions and themes directories.)" "Returns a unique list of all extensions found in in the extensions directories under `org-deck-directories'" (org-deck--cleanup-components - (mapcar ; extensions under existing dirs + (mapcar ; extensions under existing dirs (lambda (dir) (when (file-directory-p dir) (directory-files dir t "^[^.]"))) (mapcar ; possible extension directories @@ -250,7 +250,7 @@ and have the id \"title-slide\"." (defun org-deck-toc (depth info) (concat (format "<%s id='table-of-contents' class='slide'>\n" - (plist-get info :html-container)) + (plist-get info :html-container)) (format "<h2>%s</h2>\n" (org-html--translate "Table of Contents" info)) (org-html--toc-text (mapcar @@ -312,14 +312,14 @@ and have the id \"title-slide\"." (add-to-list 'snippets (concat dir base "html")))))) (org-deck--find-extensions)) (if (not (string-match-p "^[[:space:]]*$" theme)) - (add-to-list 'sheets - (if (file-name-directory theme) theme - (format "%sthemes/style/%s" prefix theme)))) + (add-to-list 'sheets + (if (file-name-directory theme) theme + (format "%sthemes/style/%s" prefix theme)))) (if (not (string-match-p "^[[:space:]]*$" transition)) - (add-to-list - 'sheets - (if (file-name-directory transition) transition - (format "%sthemes/transition/%s" prefix transition)))) + (add-to-list + 'sheets + (if (file-name-directory transition) transition + (format "%sthemes/transition/%s" prefix transition)))) (list :scripts (nreverse scripts) :sheets (nreverse sheets) :snippets snippets))) @@ -399,31 +399,31 @@ holding export options." (when (plist-get info :section-numbers) "#table-of-contents ul li {list-style-type: none;}") (format "#%s, #%s {%s}" - (nth 2 (assq 'preamble org-html-divs)) - (nth 2 (assq 'postamble org-html-divs)) - (nth 1 (assq 'both org-deck-preamble-postamble-styles))) + (nth 2 (assq 'preamble org-html-divs)) + (nth 2 (assq 'postamble org-html-divs)) + (nth 1 (assq 'both org-deck-preamble-postamble-styles))) (format "#%s {%s}" - (nth 2 (assq 'preamble org-html-divs)) - (nth 1 (assq 'preamble org-deck-preamble-postamble-styles))) + (nth 2 (assq 'preamble org-html-divs)) + (nth 1 (assq 'preamble org-deck-preamble-postamble-styles))) (format "#%s {%s}" - (nth 2 (assq 'postamble org-html-divs)) - (nth 1 (assq 'postamble org-deck-preamble-postamble-styles))) + (nth 2 (assq 'postamble org-html-divs)) + (nth 1 (assq 'postamble org-deck-preamble-postamble-styles))) org-deck-styles "</style>" "</head>" "<body>" (format "<%s id='%s' class='deck-status'>" - (nth 1 (assq 'preamble org-html-divs)) - (nth 2 (assq 'preamble org-html-divs))) + (nth 1 (assq 'preamble org-html-divs)) + (nth 2 (assq 'preamble org-html-divs))) (org-fill-template org-deck-preamble-template (org-deck-template-alist info)) (format "</%s>" (nth 1 (assq 'preamble org-html-divs))) (format "<%s id='%s' class='deck-container'>" - (nth 1 (assq 'content org-html-divs)) - (nth 2 (assq 'content org-html-divs))) + (nth 1 (assq 'content org-html-divs)) + (nth 2 (assq 'content org-html-divs))) ;; title page (format "<%s id='title-slide' class='slide'>" - (plist-get info :html-container)) + (plist-get info :html-container)) (org-fill-template org-deck-title-slide-template (org-deck-template-alist info)) (format "</%s>" (plist-get info :html-container)) @@ -437,8 +437,8 @@ holding export options." (buffer-string))) (plist-get pkg-info :snippets) "\n") (format "<%s id='%s' class='deck-status'>" - (nth 1 (assq 'postamble org-html-divs)) - (nth 2 (assq 'postamble org-html-divs))) + (nth 1 (assq 'postamble org-html-divs)) + (nth 2 (assq 'postamble org-html-divs))) (org-fill-template org-deck-postamble-template (org-deck-template-alist info)) (format "</%s>" (nth 1 (assq 'postamble org-html-divs))) |