Mercurial > emacs

changeset 107670:27d7bc8db6b7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* simple.el (append-to-buffer): Fix last change.
author Chong Yidong <cyd@stupidchicken.com>
date Thu, 25 Mar 2010 01:53:30 -0400
parents fd2cdc4e0e6a
children 71b254d49a0c
files lisp/ChangeLog lisp/simple.el
diffstat 2 files changed, 6 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Wed Mar 24 17:25:46 2010 -0400
+++ b/lisp/ChangeLog	Thu Mar 25 01:53:30 2010 -0400
@@ -1,3 +1,7 @@
+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
--- a/lisp/simple.el	Wed Mar 24 17:25:46 2010 -0400
+++ b/lisp/simple.el	Thu Mar 25 01:53:30 2010 -0400
@@ -3472,8 +3472,8 @@
     (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)