diff options
Diffstat (limited to 'lisp/ediff-mult.el')
-rw-r--r-- | lisp/ediff-mult.el | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/lisp/ediff-mult.el b/lisp/ediff-mult.el index b9ffb373766..a1dfbded153 100644 --- a/lisp/ediff-mult.el +++ b/lisp/ediff-mult.el @@ -1639,8 +1639,7 @@ Useful commands: (cond ((ediff-buffer-live-p custom-diff-buf) ;; for live session buffers we do them first because the user may ;; have changed them with respect to the underlying files - (save-excursion - (set-buffer meta-diff-buff) + (with-current-buffer meta-diff-buff (goto-char (point-max)) (insert-buffer-substring custom-diff-buf) (insert "\n"))) @@ -1649,8 +1648,8 @@ Useful commands: ediff-merge-directories ediff-merge-directories-with-ancestor)) ;; get diffs by calling shell command on ediff-custom-diff-program - (save-excursion - (set-buffer (setq tmp-buf (get-buffer-create ediff-tmp-buffer))) + (with-current-buffer + (setq tmp-buf (get-buffer-create ediff-tmp-buffer)) (erase-buffer) (shell-command (format @@ -1662,8 +1661,7 @@ Useful commands: ) t) ) - (save-excursion - (set-buffer meta-diff-buff) + (with-current-buffer meta-diff-buff (goto-char (point-max)) (insert-buffer-substring tmp-buf) (insert "\n"))) |