diff options
| author | Bastien Guerry | 2014-04-22 16:07:45 +0200 |
|---|---|---|
| committer | Bastien Guerry | 2014-04-22 16:07:45 +0200 |
| commit | 30cb51f1bc9ce5976f492b5df5d30c6298f5a2aa (patch) | |
| tree | 782f2f5767065ad571bf5b82a162da96064cf22a /lisp/org/ob-gnuplot.el | |
| parent | d5ff4ded7a225306017006fc96b0a30180ae6f6b (diff) | |
| download | emacs-30cb51f1bc9ce5976f492b5df5d30c6298f5a2aa.tar.gz emacs-30cb51f1bc9ce5976f492b5df5d30c6298f5a2aa.zip | |
Merge Org 8.2.6-1.
The last merge was from 8.2.5c, but many important bugs got
fixed between 8.2.5c and 8.2.6-1.
Diffstat (limited to 'lisp/org/ob-gnuplot.el')
| -rw-r--r-- | lisp/org/ob-gnuplot.el | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/lisp/org/ob-gnuplot.el b/lisp/org/ob-gnuplot.el index 8767e88e4c3..ffe5dcf59df 100644 --- a/lisp/org/ob-gnuplot.el +++ b/lisp/org/ob-gnuplot.el | |||
| @@ -85,10 +85,15 @@ code." | |||
| 85 | (lambda (pair) | 85 | (lambda (pair) |
| 86 | (cons | 86 | (cons |
| 87 | (car pair) ;; variable name | 87 | (car pair) ;; variable name |
| 88 | (if (listp (cdr pair)) ;; variable value | 88 | (let* ((val (cdr pair)) ;; variable value |
| 89 | (org-babel-gnuplot-table-to-data | 89 | (lp (listp val))) |
| 90 | (cdr pair) (org-babel-temp-file "gnuplot-") params) | 90 | (if lp |
| 91 | (cdr pair)))) | 91 | (org-babel-gnuplot-table-to-data |
| 92 | (let* ((first (car val)) | ||
| 93 | (tablep (or (listp first) (symbolp first)))) | ||
| 94 | (if tablep val (mapcar 'list val))) | ||
| 95 | (org-babel-temp-file "gnuplot-") params) | ||
| 96 | val)))) | ||
| 92 | (mapcar #'cdr (org-babel-get-header params :var))))) | 97 | (mapcar #'cdr (org-babel-get-header params :var))))) |
| 93 | 98 | ||
| 94 | (defun org-babel-expand-body:gnuplot (body params) | 99 | (defun org-babel-expand-body:gnuplot (body params) |