From ea8565e2ed46b925a049a231eed983dd6e2c2971 Mon Sep 17 00:00:00 2001 From: Eric Schulte Date: Sat, 12 Jun 2010 16:16:28 -0700 Subject: [PATCH] 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' --- lisp/babel/ob.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/babel/ob.el b/lisp/babel/ob.el index 242112cf5..8571c615b 100644 --- a/lisp/babel/ob.el +++ b/lisp/babel/ob.el @@ -1286,7 +1286,7 @@ block but are passed literally to the \"example-block\"." (nb-add (buffer-substring index (point))) (goto-char (match-end 0)) (setq index (point)) - (nb-add (save-excursion + (nb-add (save-current-buffer (set-buffer parent-buffer) (mapconcat ;; interpose `prefix' between every line #'identity