1
0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-12-28 10:56:57 +00:00

ob-ditaa: throw error when evaluated and :file header argument is missing

* lisp/ob-ditaa.el (org-babel-execute:ditaa): Throw error when
  evaluated and :file header argument is missing.
This commit is contained in:
Eric Schulte 2011-01-27 15:42:27 -07:00
parent 5b35351002
commit 3559280aca

View File

@ -48,7 +48,11 @@
"Execute a block of Ditaa code with org-babel.
This function is called by `org-babel-execute-src-block'."
(let* ((result-params (split-string (or (cdr (assoc :results params)) "")))
(out-file (cdr (assoc :file params)))
(out-file ((lambda (el)
(or el
(error
"ditaa code block requires :file header argument")))
(cdr (assoc :file params))))
(cmdline (cdr (assoc :cmdline params)))
(in-file (org-babel-temp-file "ditaa-"))
(cmd (concat "java -jar "