colonelpanic/dotfiles
1
0
Fork 1
Code Issues Pull Requests Packages Projects Releases Wiki Activity

[Emacs] Set predicate blacklist for keywords for org-wild-notifier

Browse Source
This commit is contained in:
Ivan Malison 2023-08-30 22:56:56 -06:00
parent 9814baed9e
commit 3ff41f19e5
1 changed files with 4 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
dotfiles/emacs.d/org-config.org
View File

@ -853,19 +853,16 @@ alphanumeric characters only."
((org-wild-notifier-keyword-whitelist nil) ((org-wild-notifier-keyword-whitelist nil)
(org-wild-notifier-tags-blacklist '("nonotify")) (org-wild-notifier-tags-blacklist '("nonotify"))
(org-wild-notifier-alert-time '(30 5 0)) (org-wild-notifier-alert-time '(30 5 0))
(org-wild-notifier-extra-alert-plist '(:persistent t))) (org-wild-notifier-extra-alert-plist '(:persistent t))
(org-wild-notifier-predicate-blacklist
'(org-wild-notifier-done-keywords-predicate)))
:config :config
(org-wild-notifier-mode +1) (org-wild-notifier-mode +1)
(defun org-wild-notify-check-at-time () (defun org-wild-notify-check-at-time ()
(interactive) (interactive)
(imalison:org-at-time (imalison:org-at-time
:fn (lambda () :fn (lambda ()
(-each (org-wild-notifier--check-events (funcall (org-wild-notifier--retrieve-events))))))
(->> (funcall (org-wild-notifier--retrieve-events))
(-map 'org-wild-notifier--check-event)
(-flatten)
(-uniq))
'org-wild-notifier--notify))))
(defun org-wild-notify-list-at-time () (defun org-wild-notify-list-at-time ()
(interactive) (interactive)
(imalison:org-at-time (imalison:org-at-time