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:
parent
0d1aaf735f
commit
b816a85ac0
|
@ -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."
|
||||
(or org-babel-current-buffer-properties
|
||||
(setq org-babel-current-buffer-properties
|
||||
(save-excursion
|
||||
(save-restriction
|
||||
(widen)
|
||||
(goto-char (point-min))
|
||||
(when (re-search-forward
|
||||
(org-make-options-regexp (list "BABEL")) nil t)
|
||||
(org-babel-parse-header-arguments
|
||||
(org-match-string-no-properties 2))))))))
|
||||
(save-match-data
|
||||
(save-excursion
|
||||
(save-restriction
|
||||
(widen)
|
||||
(goto-char (point-min))
|
||||
(when (re-search-forward
|
||||
(org-make-options-regexp (list "BABEL")) nil t)
|
||||
(org-babel-parse-header-arguments
|
||||
(org-match-string-no-properties 2)))))))))
|
||||
|
||||
(defun org-babel-parse-src-block-match ()
|
||||
"Parse the match data resulting from a match of the
|
||||
|
|
Loading…
Reference in New Issue