branch: master
commit aa5513d12ff37fff6e2ba70eca2defcabfa062cd
Author: Thomas Fitzsimmons <fitz...@fitzsim.org>
Commit: Thomas Fitzsimmons <fitz...@fitzsim.org>
excorporate-diary: Always use diary-fancy-display
* packages/excorporate/excorporate-diary.el
(excorporate-diary-enable): Ensure diary-display-function is
diary-fancy-display; warn and override if not.
---
packages/excorporate/excorporate-diary.el | 6 ++++++
1 file changed, 6 insertions(+)
diff --git a/packages/excorporate/excorporate-diary.el
b/packages/excorporate/excorporate-diary.el
index caaae20..e3435be 100644
--- a/packages/excorporate/excorporate-diary.el
+++ b/packages/excorporate/excorporate-diary.el
@@ -229,6 +229,12 @@ ARGUMENTS are the arguments to `diary-view-entries'."
#'exco-diary-diary-view-entries-override)
(add-hook 'diary-list-entries-hook #'diary-sort-entries)
(add-hook 'diary-list-entries-hook #'diary-include-other-diary-files)
+ (unless (eq diary-display-function 'diary-fancy-display)
+ (warn (format
+ (concat "Excorporate diary support needs diary-fancy-display"
+ " but diary-display-function is currently %S; overriding")
+ diary-display-function))
+ (customize-set-variable 'diary-display-function 'diary-fancy-display))
(appt-activate 1)
(message "Excorporate diary support enabled."))
