| commit | author | age | ||
| 76bbd0 | 1 | ;ELC |
| C | 2 | ;;; Compiled |
| 3 | ;;; in Emacs version 26.1 | |
| 4 | ;;; with all optimizations. | |
| 5 | ||
| 6 | ;;; This file uses dynamic docstrings, first added in Emacs 19.29. | |
| 7 | ||
| 8 | ;;; This file does not contain utf-8 non-ASCII characters, | |
| 9 | ;;; and so can be loaded in Emacs versions earlier than 23. | |
| 10 | ||
| 11 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | |
| 12 | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | |
| 13 | ||
| 14 | ||
| 15 | (require 'ob) | |
| 16 | #@65 Default arguments to use when evaluating a mscgen source block. | |
| 17 | (defvar org-babel-default-header-args:mscgen '((:results . "file") (:exports . "results")) (#$ . 422)) | |
| 18 | #@213 Execute a block of Mscgen code with Babel. | |
| 19 | This function is called by `org-babel-execute-src-block'. | |
| 20 | Default filetype is png. Modify by setting :filetype parameter to | |
| 21 | mscgen supported formats. | |
| 22 | ||
| 23 | (fn BODY PARAMS) | |
| 24 | (defalias 'org-babel-execute:mscgen #[514 "\300\236A\206 \301\302\236A\206 \303\300\236A\204 \304\305!\210\306\307\310R\"\210\311\207" [:file "output.png" :filetype "png" error "\nERROR: no output file specified. Add \":file name.png\" to the src header" org-babel-eval "mscgen -T " " -o " nil] 9 (#$ . 596)]) | |
| 25 | #@78 Raise an error because Mscgen doesn't support sessions. | |
| 26 | ||
| 27 | (fn SESSION PARAMS) | |
| 28 | (defalias 'org-babel-prep-session:mscgen #[514 "\300\301!\207" [error "Mscgen does not support sessions"] 4 (#$ . 1134)]) | |
| 29 | (provide 'ob-mscgen) | |
