summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRick Frankel <rick@rickster.com>2013-03-12 21:10:30 (GMT)
committer Rick Frankel <rick@rickster.com>2013-03-16 19:17:44 (GMT)
commit243c4618416cf32bb386590509cc7661d1667776 (patch)
tree5ea00ada25902cbe7fb2a71c1c0f93ae44f36723
parent60830fa4d27c2b86573b0829865c8555b3d76385 (diff)
downloadorg-mode-243c4618416cf32bb386590509cc7661d1667776.zip
org-mode-243c4618416cf32bb386590509cc7661d1667776.tar.gz
whitespce cleanup
-rw-r--r--contrib/lisp/ox-deck.el46
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)))