X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/35cf62d95cdcd5323dcea4a5385942c342ff1d9c..fb9f7146677ca0d6f03ca88dd8cd39bc3733682d:/lisp/org/ob-mscgen.el diff --git a/lisp/org/ob-mscgen.el b/lisp/org/ob-mscgen.el index b40f9a39ce..5838d7dec7 100644 --- a/lisp/org/ob-mscgen.el +++ b/lisp/org/ob-mscgen.el @@ -1,6 +1,6 @@ ;;; ob-msc.el --- org-babel functions for mscgen evaluation -;; Copyright (C) 2010-2012 Free Software Foundation, Inc. +;; Copyright (C) 2010-2013 Free Software Foundation, Inc. ;; Author: Juan Pechiar ;; Keywords: literate programming, reproducible research @@ -24,7 +24,7 @@ ;;; Commentary: ;; ;; This software provides EMACS org-babel export support for message -;; sequence charts. The mscgen utility is used for processing the +;; sequence charts. The mscgen utility is used for processing the ;; sequence definition, and must therefore be installed in the system. ;; ;; Mscgen is available and documented at @@ -64,13 +64,13 @@ (defun org-babel-execute:mscgen (body params) "Execute a block of Mscgen code with Babel. This function is called by `org-babel-execute-src-block'. -Default filetype is png. Modify by setting :filetype parameter to +Default filetype is png. Modify by setting :filetype parameter to mscgen supported formats." (let* ((out-file (or (cdr (assoc :file params)) "output.png" )) (filetype (or (cdr (assoc :filetype params)) "png" ))) (unless (cdr (assoc :file params)) (error " -ERROR: no output file specified. Add \":file name.png\" to the src header")) +ERROR: no output file specified. Add \":file name.png\" to the src header")) (org-babel-eval (concat "mscgen -T " filetype " -o " out-file) body) nil)) ;; signal that output has already been written to file