From e3d2d6fc91bab9f3aa1e6a18d4af97adb685d0b5 Mon Sep 17 00:00:00 2001 From: JRoberts <8711996+jr-simplex@users.noreply.github.com> Date: Mon, 4 Jul 2022 14:26:27 +0400 Subject: [PATCH] fix NDELETE parsing (#461) --- src/Simplex/Messaging/Server/StoreLog.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Simplex/Messaging/Server/StoreLog.hs b/src/Simplex/Messaging/Server/StoreLog.hs index 3d8f9625d..1f15132f0 100644 --- a/src/Simplex/Messaging/Server/StoreLog.hs +++ b/src/Simplex/Messaging/Server/StoreLog.hs @@ -89,7 +89,7 @@ instance StrEncoding StoreLogRecord where <|> "SECURE " *> (SecureQueue <$> strP_ <*> strP) <|> "NOTIFIER " *> (AddNotifier <$> strP_ <*> strP) <|> "DELETE " *> (DeleteQueue <$> strP) - <|> "NDELETE" *> (DeleteNotifier <$> strP) + <|> "NDELETE " *> (DeleteNotifier <$> strP) openWriteStoreLog :: FilePath -> IO (StoreLog 'WriteMode) openWriteStoreLog f = do