diff options
Diffstat (limited to 'lisp/org/ob-sqlite.el')
| -rw-r--r-- | lisp/org/ob-sqlite.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/org/ob-sqlite.el b/lisp/org/ob-sqlite.el index 957ee653479..22d018bcf5a 100644 --- a/lisp/org/ob-sqlite.el +++ b/lisp/org/ob-sqlite.el @@ -133,11 +133,12 @@ This function is called by `org-babel-execute-src-block'." "If RESULT looks like a trivial table, then unwrap it." (if (and (equal 1 (length result)) (equal 1 (length (car result)))) - (org-babel-read (caar result)) + (org-babel-read (caar result) t) (mapcar (lambda (row) (if (eq 'hline row) 'hline - (mapcar #'org-babel-string-read row))) result))) + (mapcar #'org-babel-string-read row))) + result))) (defun org-babel-sqlite-offset-colnames (table headers-p) "If HEADERS-P is non-nil then offset the first row as column names." @@ -152,6 +153,4 @@ Prepare SESSION according to the header arguments specified in PARAMS." (provide 'ob-sqlite) - - ;;; ob-sqlite.el ends here |