diff options
| author | Achim Gratz <Stromeko@Stromeko.DE> | 2013-05-12 20:36:51 +0200 |
|---|---|---|
| committer | Achim Gratz <Stromeko@Stromeko.DE> | 2013-05-14 08:37:23 +0200 |
| commit | bc1e3e18c9975f2befd3abc8bf43b2ad7381189c (patch) | |
| tree | 92f1b5e0f56e9d5045faaf1769ae5d5fc8fe2355 | |
| parent | 48e51fe5d98890c2af0b8ecc28cc001a344a5259 (diff) | |
| download | org-mode-bc1e3e18c9975f2befd3abc8bf43b2ad7381189c.tar.gz | |
ob-sh: detect tables correctly
* lisp/ob-sh.el (org-babel-sh-var-to-sh): When detecting a table, the
first line could be the symbol `hline' rather than a list of table
cells, so check for that as well.
Thanks to Paul Stansell for pointing out the error.
| -rw-r--r-- | lisp/ob-sh.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/ob-sh.el b/lisp/ob-sh.el index f11b799..7eda1b5 100644 --- a/lisp/ob-sh.el +++ b/lisp/ob-sh.el @@ -106,7 +106,7 @@ var of the same value." "Convert an elisp value to a string." (let ((echo-var (lambda (v) (if (stringp v) v (format "%S" v))))) (cond - ((and (listp var) (listp (car var))) + ((and (listp var) (or (listp (car var)) 'hline)) (orgtbl-to-generic var (list :sep (or sep "\t") :fmt echo-var))) ((listp var) (mapconcat echo-var var "\n")) |