(include-other-diary-files): Allow modifying

included buffer, to turn off selective display.

1 files changed, 2 insertions, 1 deletions

diff --git a/lisp/calendar/diary-lib.el b/lisp/calendar/diary-lib.el
index 9c49f17adfc..54d5dca80b8 100644
--- a/lisp/calendar/diary-lib.el
+++ b/lisp/calendar/diary-lib.el
@@ -385,7 +385,8 @@ changing the variable `diary-include-string'."
                                 (list-diary-entries original-date number)))
                 (save-excursion
                   (set-buffer (find-buffer-visiting diary-file))
-                  (subst-char-in-region (point-min) (point-max) ?\^M ?\n t)
+                  (let ((inhibit-read-only t))
+                    (subst-char-in-region (point-min) (point-max) ?\^M ?\n t))
                   (setq selective-display nil)
                   (set-buffer-modified-p diary-modified)))
             (beep)