forked from mirrors/org-mode
ob-gnuplot: create a proper table even when handed just a vector
* lisp/ob-gnuplot.el (org-babel-gnuplot-process-vars): `org-babel-gnuplot-table-to-data´ expects a table, so we need to construct one when Babel hands us a vector. Thanks to Eric Fraga for reporting the bug. http://permalink.gmane.org/gmane.emacs.orgmode/84072
This commit is contained in:
parent
0e344ae04a
commit
e89adba685
|
@ -85,10 +85,15 @@ code."
|
||||||
(lambda (pair)
|
(lambda (pair)
|
||||||
(cons
|
(cons
|
||||||
(car pair) ;; variable name
|
(car pair) ;; variable name
|
||||||
(if (listp (cdr pair)) ;; variable value
|
(let* ((val (cdr pair)) ;; variable value
|
||||||
(org-babel-gnuplot-table-to-data
|
(lp (listp val)))
|
||||||
(cdr pair) (org-babel-temp-file "gnuplot-") params)
|
(if lp
|
||||||
(cdr pair))))
|
(org-babel-gnuplot-table-to-data
|
||||||
|
(let* ((first (car val))
|
||||||
|
(tablep (or (listp first) (symbolp first))))
|
||||||
|
(if tablep val (mapcar 'list val)))
|
||||||
|
(org-babel-temp-file "gnuplot-") params)
|
||||||
|
val))))
|
||||||
(mapcar #'cdr (org-babel-get-header params :var)))))
|
(mapcar #'cdr (org-babel-get-header params :var)))))
|
||||||
|
|
||||||
(defun org-babel-expand-body:gnuplot (body params)
|
(defun org-babel-expand-body:gnuplot (body params)
|
||||||
|
|
Loading…
Reference in New Issue