(cal-tex-list-diary-entries): Use LIST-ONLY argument of

diary-list-entries rather than setting diary-display-hook.

diff --git a/lisp/calendar/cal-tex.el b/lisp/calendar/cal-tex.el
index 9ac25be0bef442b32c4dabc97c72edacbedfc4ec..ceba455c134de404eb4a82b216cf1d4d22420dcb 100644 (file)
--- a/lisp/calendar/cal-tex.el
+++ b/lisp/calendar/cal-tex.el
@@ -265,11 +265,9 @@ This definition is the heart of the calendar!")
 
 (defun cal-tex-list-diary-entries (d1 d2)
   "Generate a list of all diary-entries from absolute date D1 to D2."
-  (let ((diary-list-include-blanks nil)
-        (diary-display-hook 'ignore))
-    (diary-list-entries
-     (calendar-gregorian-from-absolute d1)
-     (1+ (- d2 d1)))))
+  (let (diary-list-include-blanks)
+    (diary-list-entries (calendar-gregorian-from-absolute d1)
+                        (1+ (- d2 d1)) t)))
 
 (defun cal-tex-preamble (&optional args)
   "Insert the LaTeX calendar preamble into `cal-tex-buffer'.