diff options
| author | Glenn Morris | 2008-05-30 02:58:33 +0000 |
|---|---|---|
| committer | Glenn Morris | 2008-05-30 02:58:33 +0000 |
| commit | fb696168dca82570bad1572d4aad45872aacf31b (patch) | |
| tree | b42c905dfb403b3246dab1d6753f54ce93edb782 | |
| parent | f082900a2bef989ef5bec078d1eac63bb69e42ab (diff) | |
| download | emacs-fb696168dca82570bad1572d4aad45872aacf31b.tar.gz emacs-fb696168dca82570bad1572d4aad45872aacf31b.zip | |
(cal-html-list-diary-entries): Use LIST-ONLY argument of
diary-list-entries rather than setting diary-display-hook.
| -rw-r--r-- | lisp/calendar/cal-html.el | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/calendar/cal-html.el b/lisp/calendar/cal-html.el index de5b68cc61b..780da9592bf 100644 --- a/lisp/calendar/cal-html.el +++ b/lisp/calendar/cal-html.el | |||
| @@ -343,10 +343,8 @@ DATE-LIST is a list of diary entries. Return only those matching DATE." | |||
| 343 | 343 | ||
| 344 | (defun cal-html-list-diary-entries (d1 d2) | 344 | (defun cal-html-list-diary-entries (d1 d2) |
| 345 | "Generate a list of all diary-entries from absolute date D1 to D2." | 345 | "Generate a list of all diary-entries from absolute date D1 to D2." |
| 346 | (let (diary-display-hook) | 346 | (diary-list-entries (calendar-gregorian-from-absolute d1) |
| 347 | (diary-list-entries | 347 | (1+ (- d2 d1)) t)) |
| 348 | (calendar-gregorian-from-absolute d1) | ||
| 349 | (1+ (- d2 d1))))) | ||
| 350 | 348 | ||
| 351 | 349 | ||
| 352 | (defun cal-html-insert-agenda-days (month year diary-list) | 350 | (defun cal-html-insert-agenda-days (month year diary-list) |