From a2204c9b8440ac3a477ce33b4649fe6e321a4915 Mon Sep 17 00:00:00 2001 From: Evgeny Poberezkin <2769109+epoberezkin@users.noreply.github.com> Date: Thu, 21 Apr 2022 17:15:41 +0100 Subject: [PATCH] remove comments, add EOL --- src/Simplex/Messaging/Agent/Store.hs | 3 +-- .../SQLite/Migrations/M20220404_ntf_subscriptions_draft.hs | 2 +- 2 files changed, 2 insertions(+), 3 deletions(-) diff --git a/src/Simplex/Messaging/Agent/Store.hs b/src/Simplex/Messaging/Agent/Store.hs index 6931f53be..ec564ceb8 100644 --- a/src/Simplex/Messaging/Agent/Store.hs +++ b/src/Simplex/Messaging/Agent/Store.hs @@ -80,8 +80,7 @@ class Monad m => MonadAgentStore s m where -- Notification device token persistence createNtfToken :: s -> NtfToken -> m () - -- TODO this should also return old tokens so that they are deleted from the server - getDeviceNtfToken :: s -> DeviceToken -> m (Maybe NtfToken, [NtfToken]) -- return current token if it exists + getDeviceNtfToken :: s -> DeviceToken -> m (Maybe NtfToken, [NtfToken]) updateNtfTokenRegistration :: s -> NtfToken -> NtfTokenId -> C.DhSecretX25519 -> m () updateNtfToken :: s -> NtfToken -> NtfTknStatus -> Maybe NtfTknAction -> m () removeNtfToken :: s -> NtfToken -> m () diff --git a/src/Simplex/Messaging/Agent/Store/SQLite/Migrations/M20220404_ntf_subscriptions_draft.hs b/src/Simplex/Messaging/Agent/Store/SQLite/Migrations/M20220404_ntf_subscriptions_draft.hs index 5f58ca0fd..7ddedddd3 100644 --- a/src/Simplex/Messaging/Agent/Store/SQLite/Migrations/M20220404_ntf_subscriptions_draft.hs +++ b/src/Simplex/Messaging/Agent/Store/SQLite/Migrations/M20220404_ntf_subscriptions_draft.hs @@ -35,4 +35,4 @@ CREATE TABLE ntf_subscriptions ( FOREIGN KEY (smp_host, smp_port, smp_ntf_id) REFERENCES rcv_queues (host, port, ntf_id) ON DELETE RESTRICT ON UPDATE CASCADE ) WITHOUT ROWID; -|] \ No newline at end of file +|]