This commit is contained in:
Evgeny Poberezkin committed 2025-11-11 17:51:50 +00:00
1 parent a4931289a7
commit 4257255de2
1 file changed
+1 -1
+1 -1
View File
@@ -81,7 +81,7 @@ testPNEncoding = do
pnMess = pnM "MyMessage"
enc pnCheck `shouldBe` "{\"checkMessages\":true}"
enc pnVerif `shouldBe` "{\"verification\":\"YWJjZA==\"}"
enc pnMess `shouldBe` "{\"message\":\"smp://AAAA@l/AAAA 1761827386 bm9uY2UAAAAAAAAAAAAAAAAAAAAAAAAA TXlNZXNzYWdl\"}"
enc pnMess `shouldBe` "{\"checkMessages\":true}"
where
enc p = BL.toStrict $ encodeWPN p
pnM :: B.ByteString -> PushNotification