Mercurial > hg > xemacs-beta
comparison lisp/files.el @ 838:bf645ed7cfe3
[xemacs-hg @ 2002-05-14 09:28:06 by ben]
revert-buffer, others
files.el: Andy's patch from 21.4. Fix evil nasty problems with revert-buffer.
menubar-items.el: Add Append to Register to Rectangles/Register menu.
config.h.in, font-lock.c: Reenable font-lock code since it's used by mouse.el. The flag for
this exists in config.h.in but not currently controllable through
configure.
author | ben |
---|---|
date | Tue, 14 May 2002 09:28:14 +0000 |
parents | 6728e641994e |
children | 047d37eb70d7 |
comparison
equal
deleted
inserted
replaced
837:0490271de7d8 | 838:bf645ed7cfe3 |
---|---|
2859 ;; has changed. | 2859 ;; has changed. |
2860 (cond ((or auto-save-p | 2860 (cond ((or auto-save-p |
2861 (buffer-modified-p) | 2861 (buffer-modified-p) |
2862 (and (setq newbuf (revert-buffer-internal | 2862 (and (setq newbuf (revert-buffer-internal |
2863 file-name)) | 2863 file-name)) |
2864 (and delay-prompt | 2864 (or noconfirm |
2865 (yes-or-no-p | 2865 (and delay-prompt |
2866 (format "Revert buffer from file %s? " | 2866 (yes-or-no-p |
2867 file-name))))) | 2867 (format "Revert buffer from file %s? " |
2868 file-name)))))) | |
2868 ;; If file was backed up but has changed since, | 2869 ;; If file was backed up but has changed since, |
2869 ;; we should make another backup. | 2870 ;; we should make another backup. |
2870 (and (not auto-save-p) | 2871 (and (not auto-save-p) |
2871 (not (verify-visited-file-modtime (current-buffer))) | 2872 (not (verify-visited-file-modtime (current-buffer))) |
2872 (setq buffer-backed-up nil)) | 2873 (setq buffer-backed-up nil)) |