diff options
| author | Eric Schulte <schulte.eric@gmail.com> | 2011-02-27 09:05:15 -0700 |
|---|---|---|
| committer | Eric Schulte <schulte.eric@gmail.com> | 2011-02-27 09:05:15 -0700 |
| commit | 76137b16fa694204cc1e1225744dac15bb96e380 (patch) | |
| tree | c186e0b07898d76375761ef4cdd205c451c70bd1 | |
| parent | eced270fbf4246360455d697b97e4633a7a6bc06 (diff) | |
| download | org-mode-76137b16fa694204cc1e1225744dac15bb96e380.tar.gz | |
ob-ref: don't treat 'hline rows as lists when indexing
* lisp/ob-ref.el (org-babel-ref-index-list): Special handling of hline
rows.
| -rw-r--r-- | lisp/ob-ref.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/ob-ref.el b/lisp/ob-ref.el index 6cb41ae..31944fd 100644 --- a/lisp/ob-ref.el +++ b/lisp/ob-ref.el @@ -181,7 +181,10 @@ to \"0:-1\"." (open (ls) (if (and (listp ls) (= (length ls) 1)) (car ls) ls))) (open (mapcar - (lambda (sub-lis) (org-babel-ref-index-list remainder sub-lis)) + (lambda (sub-lis) + (if (listp sub-lis) + (org-babel-ref-index-list remainder sub-lis) + sub-lis)) (if (or (= 0 (length portion)) (string-match ind-re portion)) (mapcar (lambda (n) (nth n lis)) |