diff --git a/src/scheduled-events.lisp b/src/scheduled-events.lisp
index f10406d..9868d3d 100644
--- a/src/scheduled-events.lisp
+++ b/src/scheduled-events.lisp
@@ -68,6 +68,7 @@
 (gen-scheduler-function (look-for-announcements
                          +announcements-check-frequency+)
   (when *thread-window*
+    (ui:notify (_ "Looking for announcements…"))
     (program-events:push-event (make-instance 'program-events:check-announcements-event))))
 
 (gen-at-boot-function purge-history