fix NDELETE parsing (#461)

This commit is contained in:
JRoberts authored and GitHub committed 2022-07-04 11:26:27 +01:00
1 parent 36b4179b8b
commit e3d2d6fc91
1 file changed
+1 -1
+1 -1
View File
@@ -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