diff --git a/src/Simplex/Messaging/Crypto.hs b/src/Simplex/Messaging/Crypto.hs index 2e45773c2..c2bec7824 100644 --- a/src/Simplex/Messaging/Crypto.hs +++ b/src/Simplex/Messaging/Crypto.hs @@ -914,8 +914,6 @@ data CryptoError CERatchetEarlierMessage Word32 | -- | duplicate message number CERatchetDuplicateMessage - | -- | unable to decode ecc key - CryptoInvalidECCKey CE.CryptoError -- TODO [webpush] remove this error, it will be parsing error deriving (Eq, Show, Exception) aesKeySize :: Int diff --git a/tests/NtfWPTests.hs b/tests/NtfWPTests.hs index 6068e5d3e..482126661 100644 --- a/tests/NtfWPTests.hs +++ b/tests/NtfWPTests.hs @@ -10,7 +10,7 @@ import Simplex.Messaging.Encoding.String (StrEncoding(..)) import qualified Data.ByteString as B import qualified Crypto.PubKey.ECC.Types as ECC import Simplex.Messaging.Notifications.Protocol -import Simplex.Messaging.Notifications.Server.Push.WebPush (wpEncrypt', encodePN) +import Simplex.Messaging.Notifications.Server.Push.WebPush (wpEncrypt', encodeWPN) import Control.Monad.Except (runExceptT) import qualified Data.ByteString.Lazy as BL import Simplex.Messaging.Notifications.Server.Push @@ -83,7 +83,7 @@ testPNEncoding = do enc pnVerif `shouldBe` "{\"verification\":\"YWJjZA==\"}" enc pnMess `shouldBe` "{\"message\":\"smp://AAAA@l/AAAA 1761827386 bm9uY2UAAAAAAAAAAAAAAAAAAAAAAAAA TXlNZXNzYWdl\"}" where - enc p = BL.toStrict $ encodePN p + enc p = BL.toStrict $ encodeWPN p pnM :: B.ByteString -> PushNotification pnM m = do let smpQ = either error id $ strDecode "smp://AAAA@l/AAAA"