diff options
| author | Richard M. Stallman <rms@gnu.org> | 1994-02-17 08:19:58 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1994-02-17 08:19:58 +0000 |
| commit | f9456b0a5b508c8b031f9cc996e904d01bcdf697 (patch) | |
| tree | fe08055ab95aca3adc8588a4776286cb78b69073 /lisp/files.el | |
| parent | 8db739de396b88ce42bd7c249a511a94f8d716c7 (diff) | |
| download | emacs-f9456b0a5b508c8b031f9cc996e904d01bcdf697.tar.gz | |
(revert-buffer): Use new insert-file-contents replace arg.
Diffstat (limited to 'lisp/files.el')
| -rw-r--r-- | lisp/files.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/files.el b/lisp/files.el index 16ba5280be9..7efca8ac188 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -1805,9 +1805,9 @@ beginning and `after-revert-hook' at the end." ;; so that we don't try to lock the file. (let ((buffer-file-name nil)) (or auto-save-p - (unlock-buffer)) - (erase-buffer)) - (insert-file-contents file-name (not auto-save-p)))) + (unlock-buffer))) + (insert-file-contents file-name (not auto-save-p) + nil nil t))) (goto-char (min opoint (point-max))) (after-find-file nil nil t) (run-hooks 'after-revert-hook) |