diff options
| author | Edward M. Reingold | 1998-06-09 22:30:01 +0000 |
|---|---|---|
| committer | Edward M. Reingold | 1998-06-09 22:30:01 +0000 |
| commit | f2ad0664957310ca41e4fef61eafa14982502f77 (patch) | |
| tree | f9dccdb94b0f8257b7d48599efac47c5e566cc7a | |
| parent | f20d548a4857d585d5780e0ee2ee54eef988a5f3 (diff) | |
| download | emacs-f2ad0664957310ca41e4fef61eafa14982502f77.tar.gz emacs-f2ad0664957310ca41e4fef61eafa14982502f77.zip | |
Prevent diary display from being corrupted on printed calendar generation.
| -rw-r--r-- | lisp/calendar/cal-tex.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calendar/cal-tex.el b/lisp/calendar/cal-tex.el index 47d179b9c72..265bcd64cec 100644 --- a/lisp/calendar/cal-tex.el +++ b/lisp/calendar/cal-tex.el | |||
| @@ -203,7 +203,7 @@ This definition is the heart of the calendar!") | |||
| 203 | (defun cal-tex-list-diary-entries (d1 d2) | 203 | (defun cal-tex-list-diary-entries (d1 d2) |
| 204 | "Generate a list of all diary-entries from absolute date D1 to D2." | 204 | "Generate a list of all diary-entries from absolute date D1 to D2." |
| 205 | (let ((diary-list-include-blanks nil) | 205 | (let ((diary-list-include-blanks nil) |
| 206 | (diary-display-hook nil)) | 206 | (diary-display-hook 'ignore)) |
| 207 | (list-diary-entries | 207 | (list-diary-entries |
| 208 | (calendar-gregorian-from-absolute d1) | 208 | (calendar-gregorian-from-absolute d1) |
| 209 | (1+ (- d2 d1))))) | 209 | (1+ (- d2 d1))))) |