summaryrefslogtreecommitdiff
path: root/lisp/files.el
diff options
context:
space:
mode:
authorKarl Heuer <kwzh@gnu.org>1996-02-21 21:32:35 +0000
committerKarl Heuer <kwzh@gnu.org>1996-02-21 21:32:35 +0000
commitfa660969617d1904b4040148c79d936c6e50692e (patch)
tree44a4bede2e281bc333d9781f700bcd5cf536ef25 /lisp/files.el
parentcd69d9dd0f49736af3a9cc1df1f375d7c0cf6917 (diff)
downloademacs-fa660969617d1904b4040148c79d936c6e50692e.tar.gz
(find-file-noselect): If after-find-file switches buffers,
return the buffer that it leaves current.
Diffstat (limited to 'lisp/files.el')
-rw-r--r--lisp/files.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el
index 31c7f257ce7..309410ba992 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -829,7 +829,8 @@ The buffer is not selected, just returned to the caller."
(setq backup-inhibited t)))
(if rawfile
nil
- (after-find-file error (not nowarn)))))
+ (after-find-file error (not nowarn))
+ (setq buf (current-buffer)))))
buf)))
(defvar after-find-file-from-revert-buffer nil)