branch: externals/tmr
commit cba45349dcbae11ffcca73210d587052876024c9
Author: Protesilaos Stavrou <i...@protesilaos.com>
Commit: Protesilaos Stavrou <i...@protesilaos.com>
Tweak tmr--notify-send
---
tmr.el | 12 +++++-------
1 file changed, 5 insertions(+), 7 deletions(-)
diff --git a/tmr.el b/tmr.el
index bac7b5befb..1b8d28f75c 100644
--- a/tmr.el
+++ b/tmr.el
@@ -122,13 +122,11 @@ such notifications."
"Send system notification for timer with START time.
Optionally include DESCRIPTION."
(let ((end (format-time-string "%T"))
- (desc-plain)
- (desc-propertized))
- (if description
- (setq desc-plain (concat "\n" description)
- desc-propertized (concat " [" (propertize description 'face
'bold) "]"))
- (setq desc-plain ""
- desc-propertized ""))
+ (desc-plain "")
+ (desc-propertized ""))
+ (when description
+ (setq desc-plain (concat "\n" description)
+ desc-propertized (concat " [" (propertize description 'face 'bold)
"]")))
;; Read: (info "(elisp) Desktop Notifications")
(notifications-notify
:title "TMR Must Recur"
