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

babel: wrapped `org-babel-params-from-buffer' in `save-match-data' 

* lisp/babel/ob.el (org-babel-params-from-buffer): wrapped in
  save-match-data
This commit is contained in:
Eric Schulte 2010-06-22 11:46:28 -07:00
parent 0d1aaf735f
commit b816a85ac0
1 changed files with 9 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
lisp/babel/ob.el
View File

@ -602,14 +602,15 @@ may be specified in the properties of the current outline entry."
may be specified at the top of the current buffer." may be specified at the top of the current buffer."
(or org-babel-current-buffer-properties (or org-babel-current-buffer-properties
(setq org-babel-current-buffer-properties (setq org-babel-current-buffer-properties
(save-excursion (save-match-data
(save-restriction (save-excursion
(widen) (save-restriction
(goto-char (point-min)) (widen)
(when (re-search-forward (goto-char (point-min))
(org-make-options-regexp (list "BABEL")) nil t) (when (re-search-forward
(org-babel-parse-header-arguments (org-make-options-regexp (list "BABEL")) nil t)
(org-match-string-no-properties 2)))))))) (org-babel-parse-header-arguments
(org-match-string-no-properties 2)))))))))
(defun org-babel-parse-src-block-match () (defun org-babel-parse-src-block-match ()
"Parse the match data resulting from a match of the "Parse the match data resulting from a match of the