summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEric Schulte <schulte.eric@gmail.com>2010-12-13 13:23:10 -0700
committerEric Schulte <schulte.eric@gmail.com>2010-12-13 13:23:10 -0700
commite3aeb07a17ee90e8e370caee2f213b7625bd95a1 (patch)
tree7d28edbd613efce9abc38f98fa5b064471a71830
parent8efcd4338d192cc926b59199dace96101bb14575 (diff)
downloadorg-mode-e3aeb07a17ee90e8e370caee2f213b7625bd95a1.tar.gz
ob-org: Padding code block with an empty title on LaTeX export.
* lisp/ob-org.el (org-babel-execute:org): Padding code block with an empty title on LaTeX export.
-rw-r--r--lisp/ob-org.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/ob-org.el b/lisp/ob-org.el
index c03fa07..53cfe93 100644
--- a/lisp/ob-org.el
+++ b/lisp/ob-org.el
@@ -46,7 +46,8 @@ This function is called by `org-babel-execute-src-block'."
(let ((result-params (split-string (or (cdr (assoc :results params)) "")))
(body (replace-regexp-in-string "^," "" body)))
(cond
- ((member "latex" result-params) (org-export-string body "latex"))
+ ((member "latex" result-params) (org-export-string
+ (concat "#+Title: \n" body) "latex"))
((member "html" result-params) (org-export-string body "html"))
((member "ascii" result-params) (org-export-string body "ascii"))
(t body))))