mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2025-01-01 11:15:00 +00:00
Code

babel: smarter `org-babel-ref-split-args' -- fixes bug parsing indexed function-style args

Browse Source
This commit is contained in:
Eric Schulte 2010-02-14 11:48:28 -07:00
parent b3e92a8193
commit 692c569215
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
contrib/babel/lisp/org-babel-ref.el
View File

@ -193,8 +193,8 @@ which case the entire range is returned."
(when (= depth 0)
(setq return (reverse (cons (substring buffer 0 -1) return)))
(setq buffer "")))
((string= holder "(") (setq depth (+ depth 1)))
((string= holder ")") (setq depth (- depth 1)))))
((or (string= holder "(") (string= holder "[")) (setq depth (+ depth 1)))
((or (string= holder ")") (string= holder "]")) (setq depth (- depth 1)))))
(mapcar #'org-babel-trim (reverse (cons buffer return)))))
(defun org-babel-ref-at-ref-p ()