mirror of
https://github.com/simplex-chat/simplex-chat.git
synced 2026-05-08 13:17:07 +00:00
Evgeny
a190d4ea9b
* website: directory page * core: use markdown in directory entries * render markdown on directory page * update markdown * toggle secrets on click * update listings asynchronously * add group links to the listing * cleanup * better directory layout with pagination * script to run website * update page navigation * search * readable markdown colors, better "read less" * core: atomic update of directory listings, to avoid files unavailable * fix symlink, sort entries on page with new first * update listings every 15 min, add activeAt time * fix sorting in the page and listing url * replace simplex:/ links on desktop
31 lines
896 B
Haskell
31 lines
896 B
Haskell
{-# LANGUAGE CPP #-}
|
|
|
|
module Simplex.Chat.Store
|
|
( DBStore,
|
|
StoreError (..),
|
|
ChatLockEntity (..),
|
|
UserMsgReceiptSettings (..),
|
|
UserContactLink (..),
|
|
GroupLinkInfo (..),
|
|
AddressSettings (..),
|
|
AutoAccept (..),
|
|
createChatStore,
|
|
migrations, -- used in tests
|
|
withTransaction,
|
|
)
|
|
where
|
|
|
|
import Simplex.Chat.Store.Profiles
|
|
import Simplex.Chat.Store.Shared
|
|
import Simplex.Messaging.Agent.Store.Common (DBStore (..), withTransaction)
|
|
import Simplex.Messaging.Agent.Store.Interface (DBOpts, createDBStore)
|
|
import Simplex.Messaging.Agent.Store.Shared (MigrationConfig, MigrationError)
|
|
#if defined(dbPostgres)
|
|
import Simplex.Chat.Store.Postgres.Migrations
|
|
#else
|
|
import Simplex.Chat.Store.SQLite.Migrations
|
|
#endif
|
|
|
|
createChatStore :: DBOpts -> MigrationConfig -> IO (Either MigrationError DBStore)
|
|
createChatStore dbCreateOpts = createDBStore dbCreateOpts migrations
|