1 files changed, 1 insertions, 0 deletions

diff --git a/Announcer.hs b/Announcer.hs
index 6d971ebf..370ef13a 100644
--- a/Announcer.hs
+++ b/Announcer.hs
@@ -177,6 +177,7 @@ listener announcer = relisten
           case cmd of
             ScheduleAction (k, p, s) -> atomically $ modifyScheduled $ PSQ.insert' k s p
             UnscheduleAction k       -> atomically $ modifyScheduled $ PSQ.delete k
+            RunAction io -> io
             RunActionSTM k (ScheduledItem f) -> do
               now <- getPOSIXTime
               join . atomically $ modifyScheduled (PSQ.delete k) >> f announcer k now