diff options
| author | Glenn Morris | 2006-05-13 06:12:10 +0000 |
|---|---|---|
| committer | Glenn Morris | 2006-05-13 06:12:10 +0000 |
| commit | 6f2ee2454f7c0895d89d0faed926d56d60d7dd85 (patch) | |
| tree | 14770111c806a7fd3e917ea1493bcfc316c9752c | |
| parent | 0df333e5c914cd21820d87a8e4380af0ff28a926 (diff) | |
| download | emacs-6f2ee2454f7c0895d89d0faed926d56d60d7dd85.tar.gz emacs-6f2ee2454f7c0895d89d0faed926d56d60d7dd85.zip | |
(include-other-diary-files, diary-mail-entries): Refer to
diary-view-entries, diary-list-entries, diary-show-all-entries rather
than obsolete aliases.
| -rw-r--r-- | lisp/calendar/diary-lib.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/calendar/diary-lib.el b/lisp/calendar/diary-lib.el index 6ced08bf083..c27939b8075 100644 --- a/lisp/calendar/diary-lib.el +++ b/lisp/calendar/diary-lib.el | |||
| @@ -517,7 +517,7 @@ changing the variable `diary-include-string'." | |||
| 517 | (unwind-protect | 517 | (unwind-protect |
| 518 | (setq diary-entries-list | 518 | (setq diary-entries-list |
| 519 | (append diary-entries-list | 519 | (append diary-entries-list |
| 520 | (list-diary-entries original-date number))) | 520 | (diary-list-entries original-date number))) |
| 521 | (with-current-buffer (find-buffer-visiting diary-file) | 521 | (with-current-buffer (find-buffer-visiting diary-file) |
| 522 | (diary-unhide-everything))) | 522 | (diary-unhide-everything))) |
| 523 | (beep) | 523 | (beep) |
| @@ -820,7 +820,7 @@ to run it every morning at 1am." | |||
| 820 | (if (string-equal diary-mail-addr "") | 820 | (if (string-equal diary-mail-addr "") |
| 821 | (error "You must set `diary-mail-addr' to use this command") | 821 | (error "You must set `diary-mail-addr' to use this command") |
| 822 | (let ((diary-display-hook 'fancy-diary-display)) | 822 | (let ((diary-display-hook 'fancy-diary-display)) |
| 823 | (list-diary-entries (calendar-current-date) (or ndays diary-mail-days))) | 823 | (diary-list-entries (calendar-current-date) (or ndays diary-mail-days))) |
| 824 | (compose-mail diary-mail-addr | 824 | (compose-mail diary-mail-addr |
| 825 | (concat "Diary entries generated " | 825 | (concat "Diary entries generated " |
| 826 | (calendar-date-string (calendar-current-date)))) | 826 | (calendar-date-string (calendar-current-date)))) |