forked from mirrors/org-mode
babel: replaced `save-excursion' with `with-current-buffer'
* lisp/babel/ob.el (org-babel-expand-noweb-references): `save-excursion' is not longer defeated by `set-buffer'
This commit is contained in:
parent
e0b71bf8e2
commit
ea8565e2ed
|
@ -1286,7 +1286,7 @@ block but are passed literally to the \"example-block\"."
|
||||||
(nb-add (buffer-substring index (point)))
|
(nb-add (buffer-substring index (point)))
|
||||||
(goto-char (match-end 0))
|
(goto-char (match-end 0))
|
||||||
(setq index (point))
|
(setq index (point))
|
||||||
(nb-add (save-excursion
|
(nb-add (save-current-buffer
|
||||||
(set-buffer parent-buffer)
|
(set-buffer parent-buffer)
|
||||||
(mapconcat ;; interpose `prefix' between every line
|
(mapconcat ;; interpose `prefix' between every line
|
||||||
#'identity
|
#'identity
|
||||||
|
|
Loading…
Reference in New Issue