diff options
| -rw-r--r-- | lisp/calendar/diary-lib.el | 3 |
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'." | |||
| 385 | (list-diary-entries original-date number))) | 385 | (list-diary-entries original-date number))) |
| 386 | (save-excursion | 386 | (save-excursion |
| 387 | (set-buffer (find-buffer-visiting diary-file)) | 387 | (set-buffer (find-buffer-visiting diary-file)) |
| 388 | (subst-char-in-region (point-min) (point-max) ?\^M ?\n t) | 388 | (let ((inhibit-read-only t)) |
| 389 | (subst-char-in-region (point-min) (point-max) ?\^M ?\n t)) | ||
| 389 | (setq selective-display nil) | 390 | (setq selective-display nil) |
| 390 | (set-buffer-modified-p diary-modified))) | 391 | (set-buffer-modified-p diary-modified))) |
| 391 | (beep) | 392 | (beep) |