ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Merge branch 'master' of git+ssh://repo.or.cz/srv/git/org-mode

This commit is contained in:
Carsten Dominik 2009-10-15 10:24:15 +02:00
parent 77a9f4ecf1 b0c1758c2a
commit 6846edeba3
2 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
contrib/babel/lisp/langs/org-babel-dot.el
View File

@ -57,10 +57,11 @@ called by `org-babel-execute-src-block'."
(let ((result-params (split-string (or (cdr (assoc :results params)) "")))
(out-file (cdr (assoc :file params)))
(cmdline (cdr (assoc :cmdline params)))
(cmd (or (cdr (assoc :cmd params)) "dot"))
(in-file (make-temp-file "org-babel-dot")))
(with-temp-file in-file (insert body))
(message (concat "dot " in-file " " cmdline " -o " out-file))
(shell-command (concat "dot " in-file " " cmdline " -o " out-file))
(message (concat cmd " " in-file " " cmdline " -o " out-file))
(shell-command (concat cmd " " in-file " " cmdline " -o " out-file))
out-file))
(defun org-babel-prep-session:dot (session params)

2
lisp/org-src.el
View File

@ -122,7 +122,7 @@ but which mess up the display of a snippet in Org exported files.")
(defcustom org-src-lang-modes
'(("ocaml" . tuareg) ("elisp" . emacs-lisp) ("ditaa" . artist)
("asymptote" . asy))
("asymptote" . asy) ("dot" . fundamental))
"Alist mapping languages to their major mode.
The key is the language name, the value is the string that should
be inserted as the name of the major mode. For many languages this is