diff --git a/src/Simplex/Messaging/Agent/Store/SQLite/Schema.hs b/src/Simplex/Messaging/Agent/Store/SQLite/Schema.hs index 3ef9c35a0..7739908bd 100644 --- a/src/Simplex/Messaging/Agent/Store/SQLite/Schema.hs +++ b/src/Simplex/Messaging/Agent/Store/SQLite/Schema.hs @@ -6,8 +6,8 @@ module Simplex.Messaging.Agent.Store.SQLite.Schema where import Database.SQLite.Simple createSchema :: Connection -> IO () -createSchema conn = do - map +createSchema conn = + mapM_ (execute_ conn) [ recipientQueues --, -- senderQueues, diff --git a/src/Simplex/Messaging/Agent/Store/SQLite/sql/connections.sql b/src/Simplex/Messaging/Agent/Store/SQLite/sql/connections.sql deleted file mode 100644 index e69de29bb..000000000 diff --git a/src/Simplex/Messaging/Agent/Store/SQLite/sql/messages.sql b/src/Simplex/Messaging/Agent/Store/SQLite/sql/messages.sql deleted file mode 100644 index e69de29bb..000000000 diff --git a/src/Simplex/Messaging/Agent/Store/SQLite/sql/recipient_queues.sql b/src/Simplex/Messaging/Agent/Store/SQLite/sql/recipient_queues.sql deleted file mode 100644 index 09d499123..000000000 --- a/src/Simplex/Messaging/Agent/Store/SQLite/sql/recipient_queues.sql +++ /dev/null @@ -1,4 +0,0 @@ -CREATE TABLE IF NOT EXISTS recipient_queues - ( id INTEGER PRIMARY KEY, - rcvId TEXT - ) \ No newline at end of file diff --git a/src/Simplex/Messaging/Agent/Store/SQLite/sql/sender_queues.sql b/src/Simplex/Messaging/Agent/Store/SQLite/sql/sender_queues.sql deleted file mode 100644 index e69de29bb..000000000