From 6c0b60796d4e0c7ada1c0673e90e74e0a8462c77 Mon Sep 17 00:00:00 2001 From: Mark Wooding Date: Thu, 27 Jan 2022 23:23:45 +0000 Subject: [PATCH] el/dot-emacs.el: Hoist definition of `mdw-diary-for-org-mode-p'. --- el/dot-emacs.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/el/dot-emacs.el b/el/dot-emacs.el index a90c58a..67a5d1e 100644 --- a/el/dot-emacs.el +++ b/el/dot-emacs.el @@ -368,6 +368,9 @@ it's currently off." ;; Functions for sexp diary entries. +(defvar mdw-diary-for-org-mode-p nil + "Display diary along with the agenda?") + (defun mdw-not-org-mode (form) "As FORM, but not in Org mode agenda." (and (not mdw-diary-for-org-mode-p) @@ -447,9 +450,6 @@ as output rather than a string." (nth 2 when)))))))) (eq w d))) -(defvar mdw-diary-for-org-mode-p nil - "Display diary along with the agenda?") - (defadvice org-agenda-list (around mdw-preserve-links activate) (let ((mdw-diary-for-org-mode-p t)) ad-do-it)) -- 2.11.0