ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

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

This commit is contained in:
Carsten Dominik 2010-04-25 09:03:29 +02:00
parent 3864204d37 a2518df498
commit de5d40ba98
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -98,8 +98,10 @@ return nil."
(let ((case-fold-search t) (let ((case-fold-search t)
type args new-refere new-referent result lob-info split-file split-ref type args new-refere new-referent result lob-info split-file split-ref
index index-row index-col) index index-row index-col)
;; if ref is indexed grab the indices ;; if ref is indexed grab the indices -- beware nested indicies
(when (string-match "\\[\\(.+\\)\\]" ref) (when (and (string-match "\\[\\(.+\\)\\]" ref)
(let ((str (substring ref 0 (match-beginning 0))))
(= (count ?( str) (count ?) str))))
(setq index (match-string 1 ref)) (setq index (match-string 1 ref))
(setq ref (substring ref 0 (match-beginning 0)))) (setq ref (substring ref 0 (match-beginning 0))))
;; assign any arguments to pass to source block ;; assign any arguments to pass to source block