diff options
Diffstat (limited to 'lisp/org/ob-table.el')
| -rw-r--r-- | lisp/org/ob-table.el | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/org/ob-table.el b/lisp/org/ob-table.el index 99951cab7bf..8b3e36d735c 100644 --- a/lisp/org/ob-table.el +++ b/lisp/org/ob-table.el @@ -50,7 +50,7 @@ ;; #+TBLFM: $2='(sbe 'fibbd (n $1)) ;;; Code: -(require 'ob) +(require 'ob-core) (defun org-babel-table-truncate-at-newline (string) "Replace newline character with ellipses. @@ -97,9 +97,11 @@ as shown in the example below. (lambda (el) (if (eq '$ el) (prog1 nil (setq quote t)) - (prog1 (if quote - (format "\"%s\"" el) - (org-no-properties el)) + (prog1 + (cond + (quote (format "\"%s\"" el)) + ((stringp el) (org-no-properties el)) + (t el)) (setq quote nil)))) (cdr var))))) variables))) |