Mercurial > emacs
comparison lisp/files.el @ 22465:5dcb65955074
(find-file-noselect): Use find-file-noselect-1
after "Save file and revisit literally? ".
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 13 Jun 1998 04:34:52 +0000 |
| parents | 9a8440593987 |
| children | 7e79814e7263 |
comparison
equal
deleted
inserted
replaced
| 22464:fc8109f5d8f5 | 22465:5dcb65955074 |
|---|---|
| 926 (if (y-or-n-p (if rawfile | 926 (if (y-or-n-p (if rawfile |
| 927 "Save file and revisit literally? " | 927 "Save file and revisit literally? " |
| 928 "Save file and revisit non-literally? ")) | 928 "Save file and revisit non-literally? ")) |
| 929 (progn | 929 (progn |
| 930 (save-buffer) | 930 (save-buffer) |
| 931 (revert-buffer t t)) | 931 (find-file-noselect-1 buf filename nowarn |
| 932 rawfile truename number)) | |
| 932 (if (y-or-n-p (if rawfile | 933 (if (y-or-n-p (if rawfile |
| 933 "Discard your edits and revisit file literally? " | 934 "Discard your edits and revisit file literally? " |
| 934 "Discard your edits and revisit file non-literally? ")) | 935 "Discard your edits and revisit file non-literally? ")) |
| 935 (find-file-noselect-1 buf filename nowarn | 936 (find-file-noselect-1 buf filename nowarn |
| 936 rawfile truename number) | 937 rawfile truename number) |