calcurse: notify whole-day events every morning

The calcurse daemon only alerts timed appointments, so birthdays went unnoticed. A daily 09:00 timer, started from xmonad and persistent across suspend, sends today's events through notify-send.

.config/systemd/user/calcurse-today.service

@@ -0,0 +1,6 @@
+[Unit]
+Description=Notify today's calcurse events
+
+[Service]
+Type=oneshot
+ExecStart=%h/.local/bin/calcurse-today

.config/systemd/user/calcurse-today.timer

@@ -0,0 +1,6 @@
+[Unit]
+Description=Notify today's calcurse events every morning
+
+[Timer]
+OnCalendar=*-*-* 09:00
+Persistent=true

.config/xmonad/xmonad.hs

@@ -358,6 +358,7 @@ myStartupHook = do
   spawnOnce "nm-applet"
   spawnOnce "arch-audit-gtk"
   spawnOnce "calcurse --daemon"
+  spawnOnce "systemctl --user start calcurse-today.timer"
   spawnOnce "systemctl --user start dunst"
   spawnOnce "lxpolkit"
   spawnOnce "numlockx"

.local/bin/calcurse-today

@@ -0,0 +1,9 @@
+#!/bin/bash
+# Notify today's whole-day calcurse events (the daemon only alerts timed appointments).
+set -euo pipefail
+
+events=$(calcurse -Q --filter-type event,recur-event --days 1 \
+    --format-event '%m\n' --format-recur-event '%m\n' | tail -n +2)
+
+[[ -n $events ]] || exit 0
+notify-send -a calcurse -i x-office-calendar "Today" "$events"