branch: externals/org-notify
commit c6e1f18aac66339ebc4255e393cd9ed4f7db5e88
Author: Peter Münster <p...@a16n.net>
Commit: Peter Münster <p...@a16n.net>
Simplification in org-notify-action-email
---
org-notify.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/org-notify.el b/org-notify.el
index 888c05fedf..9857c3c544 100644
--- a/org-notify.el
+++ b/org-notify.el
@@ -336,8 +336,8 @@ seconds. The default value for SECS is 20."
(compose-mail user-mail-address (concat "TODO: " (plist-get plist :heading)))
(insert (org-notify-body-text plist))
(funcall send-mail-function)
- (cl-letf (((symbol-function 'yes-or-no-p) (lambda (_) t)))
- (kill-buffer)))
+ (set-visited-file-name nil)
+ (kill-buffer))
(defun org-notify-select-highest-window ()
"Select the highest window on the frame, that is not is not an
