forked from mirrors/org-mode
babel: Fix bug in ‘org-babel-lob-get-info’.
* lisp/ob-lob.el (org-babel-lob-get-info): Use `save-match-data'. Callers rely on the match data being set to ‘org-babel-lob-one-liner-regexp’.
This commit is contained in:
parent
d45b5a7884
commit
caad78ca8a
|
@ -116,9 +116,10 @@ if so then run the appropriate source block from the Library."
|
||||||
(match-string 2) (match-string 11)))
|
(match-string 2) (match-string 11)))
|
||||||
(save-excursion
|
(save-excursion
|
||||||
(forward-line -1)
|
(forward-line -1)
|
||||||
|
(save-match-data
|
||||||
(and (looking-at (concat org-babel-src-name-regexp
|
(and (looking-at (concat org-babel-src-name-regexp
|
||||||
"\\([^\n]*\\)$"))
|
"\\([^\n]*\\)$"))
|
||||||
(org-no-properties (match-string 1))))))))))
|
(org-no-properties (match-string 1)))))))))))
|
||||||
|
|
||||||
(defvar org-babel-default-header-args:emacs-lisp) ; Defined in ob-emacs-lisp.el
|
(defvar org-babel-default-header-args:emacs-lisp) ; Defined in ob-emacs-lisp.el
|
||||||
(defun org-babel-lob-execute (info)
|
(defun org-babel-lob-execute (info)
|
||||||
|
|
Loading…
Reference in a new issue