From 25c27855bc88496e049a14171802e95020904022 Mon Sep 17 00:00:00 2001 From: Ivan Malison Date: Mon, 3 Aug 2015 10:34:16 -0700 Subject: [PATCH] Disable notifications with if statement instead of comment. --- dotfiles/emacs.d/init.el | 15 ++++++++------- 1 file changed, 8 insertions(+), 7 deletions(-) diff --git a/dotfiles/emacs.d/init.el b/dotfiles/emacs.d/init.el index 42dc0592..95305f90 100644 --- a/dotfiles/emacs.d/init.el +++ b/dotfiles/emacs.d/init.el @@ -708,13 +708,14 @@ The current directory is assumed to be the project's root otherwise." (setq helm-org-headings-fontify t) ;; Enable appointment notifications. - ;; (defadvice org-agenda-to-appt (before wickedcool activate) - ;; "Clear the appt-time-msg-list." - ;; (setq appt-time-msg-list nil)) - ;; (appt-activate) - ;; (defun org-agenda-to-appt-no-message () - ;; (suppress-messages (org-agenda-to-appt))) - ;; (run-at-time "00:00" 60 'org-agenda-to-appt-no-message) + (if nil + (defadvice org-agenda-to-appt (before wickedcool activate) + "Clear the appt-time-msg-list." + (setq appt-time-msg-list nil)) + (appt-activate) + (defun org-agenda-to-appt-no-message () + (suppress-messages (org-agenda-to-appt))) + (run-at-time "00:00" 60 'org-agenda-to-appt-no-message)) (defun org-archive-if (condition-function) (if (funcall condition-function)