Преглед на файлове

Merge branch 'master' of git+ssh://repo.or.cz/srv/git/org-mode

Carsten Dominik преди 15 години
родител
ревизия
9d76d9c308
променени са 1 файла, в които са добавени 2 реда и са изтрити 2 реда
  1. 2 2
      contrib/babel/lisp/org-babel-ref.el

+ 2 - 2
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 ()