mirror of
https://github.com/simplex-chat/simplex-chat.git
synced 2026-03-31 14:06:05 +00:00
0f4473d272
* core: delivery receipts * update simplexmq * preference, migration * add activated state to receipts preference, update tests * set receiveReceipts as activated on new profiles * update simplexmq, fix tests * update simplexmq, fix withAckMessage * one more option * more * use tryChatError in ack message * enable all tests * rename pref * update item status on delivery receipts * show receipts for tests * remove chat preference for delivery receipts * add user, contact and group settings for delivery receipts * only send delivery receipts if enabled for the contact or user profile (and not disabled for the contact) * fix tests * reuse event, test * configure per contact - db, api, test * rename commands * update simplexmq --------- Co-authored-by: spaced4ndy <8711996+spaced4ndy@users.noreply.github.com>
28 lines
836 B
Haskell
28 lines
836 B
Haskell
module Simplex.Chat.Store
|
|
( SQLiteStore,
|
|
StoreError (..),
|
|
UserMsgReceiptSettings (..),
|
|
UserContactLink (..),
|
|
AutoAccept (..),
|
|
createChatStore,
|
|
migrations, -- used in tests
|
|
chatStoreFile,
|
|
agentStoreFile,
|
|
withTransaction,
|
|
)
|
|
where
|
|
|
|
import Simplex.Chat.Store.Migrations
|
|
import Simplex.Chat.Store.Profiles
|
|
import Simplex.Chat.Store.Shared
|
|
import Simplex.Messaging.Agent.Store.SQLite (MigrationConfirmation, MigrationError, SQLiteStore (..), createSQLiteStore, withTransaction)
|
|
|
|
createChatStore :: FilePath -> String -> MigrationConfirmation -> IO (Either MigrationError SQLiteStore)
|
|
createChatStore dbPath dbKey = createSQLiteStore dbPath dbKey migrations
|
|
|
|
chatStoreFile :: FilePath -> FilePath
|
|
chatStoreFile = (<> "_chat.db")
|
|
|
|
agentStoreFile :: FilePath -> FilePath
|
|
agentStoreFile = (<> "_agent.db")
|