Mercurial > emacs
comparison lisp/files.el @ 14636:2edced5a8756
(find-file-noselect): If after-find-file switches buffers,
return the buffer that it leaves current.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Wed, 21 Feb 1996 21:32:35 +0000 |
parents | 5a1435bd8ff3 |
children | 3682b5e64ce3 |
comparison
equal
deleted
inserted
replaced
14635:7a7506ffde31 | 14636:2edced5a8756 |
---|---|
827 (progn | 827 (progn |
828 (make-local-variable 'backup-inhibited) | 828 (make-local-variable 'backup-inhibited) |
829 (setq backup-inhibited t))) | 829 (setq backup-inhibited t))) |
830 (if rawfile | 830 (if rawfile |
831 nil | 831 nil |
832 (after-find-file error (not nowarn))))) | 832 (after-find-file error (not nowarn)) |
833 (setq buf (current-buffer))))) | |
833 buf))) | 834 buf))) |
834 | 835 |
835 (defvar after-find-file-from-revert-buffer nil) | 836 (defvar after-find-file-from-revert-buffer nil) |
836 | 837 |
837 (defun after-find-file (&optional error warn noauto | 838 (defun after-find-file (&optional error warn noauto |