diff --git a/src/Simplex/Messaging/Server/MsgStore/Journal.hs b/src/Simplex/Messaging/Server/MsgStore/Journal.hs
index 7e5743664..bcc7a7e0c 100644
--- a/src/Simplex/Messaging/Server/MsgStore/Journal.hs
+++ b/src/Simplex/Messaging/Server/MsgStore/Journal.hs
@@ -586,7 +586,7 @@ instance MsgStoreClass (JournalMsgStore s) where
             readTVarIO (handles q) >>= \case
               Just (MsgQueueHandles _ rh wh_) -> case wh_ of
                 Just wh -> (++) <$> getAllMsgs rh (bytePos rs) (byteCount rs - bytePos rs) <*> getAllMsgs wh 0 (bytePos ws)
-                _ -> getAllMsgs rh (bytePos rs) (bytePos ws - bytePos rs)
+                Nothing -> getAllMsgs rh (bytePos rs) (bytePos ws - bytePos rs)
               Nothing -> pure []
         | otherwise = pure []
       getAllMsgs h pos sz