From 692c569215453f4283d3ecfa24d3d6e1f2715c02 Mon Sep 17 00:00:00 2001 From: Eric Schulte Date: Sun, 14 Feb 2010 11:48:28 -0700 Subject: [PATCH] babel: smarter `org-babel-ref-split-args' -- fixes bug parsing indexed function-style args --- contrib/babel/lisp/org-babel-ref.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/contrib/babel/lisp/org-babel-ref.el b/contrib/babel/lisp/org-babel-ref.el index dc5102051..c0e6a5539 100644 --- a/contrib/babel/lisp/org-babel-ref.el +++ b/contrib/babel/lisp/org-babel-ref.el @@ -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 ()