summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <n.goaziou@gmail.com>2013-05-30 14:33:47 +0200
committerNicolas Goaziou <n.goaziou@gmail.com>2013-05-30 14:33:47 +0200
commit6a788618e30fef787b439760065c122dfa8aad3f (patch)
treeef6d478db09f56651b57e82f7cd96a9f81229a03
parent9d22167c68d6ff7cfedc4b5aa7d538deee515df2 (diff)
parent752a4eb49d1dff09b4a59e31bf29128a3202dc22 (diff)
downloadorg-mode-6a788618e30fef787b439760065c122dfa8aad3f.tar.gz
Merge branch 'maint'
Conflicts: contrib/lisp/ox-deck.el
-rw-r--r--contrib/lisp/ox-deck.el8
-rw-r--r--contrib/lisp/ox-groff.el2
-rw-r--r--lisp/ox-latex.el2
-rw-r--r--lisp/ox-man.el2
-rw-r--r--lisp/ox-texinfo.el2
5 files changed, 8 insertions, 8 deletions
diff --git a/contrib/lisp/ox-deck.el b/contrib/lisp/ox-deck.el
index dcb5879..bdcdcbc 100644
--- a/contrib/lisp/ox-deck.el
+++ b/contrib/lisp/ox-deck.el
@@ -385,10 +385,10 @@ the \"slide\" class will be added to the to the list element,
CONTENTS is the transcoded contents string. INFO is a plist
holding export options."
(let ((pkg-info (org-deck--get-packages info))
- (org-html--pre/postamble-class "deck-status")
- (info (plist-put
- (plist-put info :html-preamble (plist-get info :deck-preamble))
- :html-postamble (plist-get info :deck-postamble))))
+ (org-html--pre/postamble-class "deck-status")
+ (info (plist-put
+ (plist-put info :html-preamble (plist-get info :deck-preamble))
+ :html-postamble (plist-get info :deck-postamble))))
(mapconcat
'identity
(list
diff --git a/contrib/lisp/ox-groff.el b/contrib/lisp/ox-groff.el
index ca50b18..cd7b78c 100644
--- a/contrib/lisp/ox-groff.el
+++ b/contrib/lisp/ox-groff.el
@@ -1949,7 +1949,7 @@ Return PDF file name or an error if it couldn't be produced."
;; Collect standard errors from output buffer.
(setq errors (org-groff-collect-errors outbuf))))
(t (error "No valid command to process to PDF")))
- (let ((pdffile (concat out-dir base-name ".pdf")))
+ (let ((pdffile (concat (file-name-sans-extension full-name) ".pdf")))
;; Check for process failure. Provide collected errors if
;; possible.
(if (not (file-exists-p pdffile))
diff --git a/lisp/ox-latex.el b/lisp/ox-latex.el
index fdada8b..8c62897 100644
--- a/lisp/ox-latex.el
+++ b/lisp/ox-latex.el
@@ -2892,7 +2892,7 @@ Return PDF file name or an error if it couldn't be produced."
;; Collect standard errors from output buffer.
(setq errors (and (not snippet) (org-latex--collect-errors outbuf)))))
(t (error "No valid command to process to PDF")))
- (let ((pdffile (concat out-dir base-name ".pdf")))
+ (let ((pdffile (concat (file-name-sans-extension full-name) ".pdf")))
;; Check for process failure. Provide collected errors if
;; possible.
(if (not (file-exists-p pdffile))
diff --git a/lisp/ox-man.el b/lisp/ox-man.el
index 4a5add8..55a79f7 100644
--- a/lisp/ox-man.el
+++ b/lisp/ox-man.el
@@ -1233,7 +1233,7 @@ Return PDF file name or an error if it couldn't be produced."
;; Collect standard errors from output buffer.
(setq errors (org-man-collect-errors outbuf))))
(t (error "No valid command to process to PDF")))
- (let ((pdffile (concat out-dir base-name ".pdf")))
+ (let ((pdffile (concat (file-name-sans-extension full-name) ".pdf")))
;; Check for process failure. Provide collected errors if
;; possible.
(if (not (file-exists-p pdffile))
diff --git a/lisp/ox-texinfo.el b/lisp/ox-texinfo.el
index 9cdd08e..b468ce1 100644
--- a/lisp/ox-texinfo.el
+++ b/lisp/ox-texinfo.el
@@ -1830,7 +1830,7 @@ Return INFO file name or an error if it couldn't be produced."
;; Collect standard errors from output buffer.
(setq errors (org-texinfo-collect-errors outbuf))))
(t (error "No valid command to process to Info")))
- (let ((infofile (concat out-dir base-name ".info")))
+ (let ((infofile (concat (file-name-sans-extension full-name) ".info")))
;; Check for process failure. Provide collected errors if
;; possible.
(if (not (file-exists-p infofile))