Commit 9d30a9f4 authored by Chong Yidong's avatar Chong Yidong

* simple.el (append-to-buffer): Fix last change.

parent f79a01db
2010-03-25 Chong Yidong <cyd@stupidchicken.com>
* simple.el (append-to-buffer): Fix last change.
2010-03-24 Chong Yidong <cyd@stupidchicken.com>
* simple.el (append-to-buffer): Ensure that point is preserved if
......
......@@ -3472,8 +3472,8 @@ START and END specify the portion of the current buffer to be copied."
(let* ((append-to (get-buffer-create buffer))
(windows (get-buffer-window-list append-to t t))
point)
(with-current-buffer append-to
(save-excursion
(save-excursion
(with-current-buffer append-to
(setq point (point))
(barf-if-buffer-read-only)
(insert-buffer-substring oldbuf start end)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment