Commit ca67b44e authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(list-diary-entries): Reread the diary file if it has changed.

parent 7e7c9c4e
......@@ -239,9 +239,11 @@ These hooks have the following distinct roles:
(message "Preparing diary...")
(let ((diary-buffer (find-buffer-visiting d-file)))
(set-buffer (if diary-buffer
(find-file-noselect d-file t))))
(if (not diary-buffer)
(set-buffer (find-file-noselect d-file t))
(set-buffer diary-buffer)
(or (verify-visited-file-modtime diary-buffer)
(revert-buffer t t))))
(setq selective-display t)
(setq selective-display-ellipses nil)
(setq old-diary-syntax-table (syntax-table))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment