emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/org-notify 7664636244 2/3: Merge branch 'externals/org-


From: ELPA Syncer
Subject: [elpa] externals/org-notify 7664636244 2/3: Merge branch 'externals/org-notify' of git://git.sv.gnu.org/emacs/elpa
Date: Wed, 2 Nov 2022 13:58:00 -0400 (EDT)

branch: externals/org-notify
commit 7664636244eaca497709974f160d0c48f341b1b8
Merge: dbb2347fb4 bbd9a049ff
Author: Peter Münster <pm@a16n.net>
Commit: Peter Münster <pm@a16n.net>

    Merge branch 'externals/org-notify' of git://git.sv.gnu.org/emacs/elpa
---
 org-notify.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/org-notify.el b/org-notify.el
index 0ca2cb90fa..df0cb8c367 100644
--- a/org-notify.el
+++ b/org-notify.el
@@ -43,11 +43,11 @@
 ;;
 ;; (org-notify-add 'appt
 ;;                 '(:time "-1s" :period "20s" :duration 10
-;;                   :actions (-message -ding))
+;;                   :actions (message ding))
 ;;                 '(:time "15m" :period "2m" :duration 100
-;;                   :actions -notify)
-;;                 '(:time "2h" :period "5m" :actions -message)
-;;                 '(:time "3d" :actions -email))
+;;                   :actions notify)
+;;                 '(:time "2h" :period "5m" :actions message)
+;;                 '(:time "3d" :actions email))
 ;;
 ;; This means for todo-items with `notify' property set to `appt': 3 days
 ;; before deadline, send a reminder-email, 2 hours before deadline, start to
@@ -200,7 +200,7 @@ forgotten tasks."
                  (cl-incf notification-cnt)
                   (dolist (action actions)
                     (funcall (if (fboundp action) action
-                               (intern (concat "org-notify-action"
+                               (intern (concat "org-notify-action-"
                                                (symbol-name action))))
                             plist))
                  (when (>= notification-cnt 
org-notify-max-notifications-per-run)
@@ -411,7 +411,7 @@ terminal an Emacs window."
     (org-notify-action-window plist)))
 
 ;;; Provide a minimal default setup.
-(org-notify-add 'default '(:time "1h" :actions -notify/window
+(org-notify-add 'default '(:time "1h" :actions notify/window
                                 :period "2m" :duration 60))
 
 (provide 'org-notify)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]