This commit is contained in:
Evgeny Poberezkin
2024-10-23 12:22:49 +01:00
parent cabfee51f6
commit b1c8c17e4e
+1 -1
View File
@@ -1772,7 +1772,7 @@ processServerMessages = do
storedQueues = storedQueues + 1
}
Left e -> do
logInfo $ "failed expiring messages in queue " <> T.pack (queueDirectory $ queue q) <> ": " <> tshow e
logError $ "failed expiring messages in queue " <> T.pack (queueDirectory $ queue q) <> ": " <> tshow e
exitFailure
where
expireQueue = do