diff --git a/src/Simplex/Messaging/Agent.hs b/src/Simplex/Messaging/Agent.hs index 9c787a1b5..e7121172f 100644 --- a/src/Simplex/Messaging/Agent.hs +++ b/src/Simplex/Messaging/Agent.hs @@ -9,8 +9,8 @@ module Simplex.Messaging.Agent (runSMPAgent) where import Control.Monad.IO.Unlift import Control.Monad.Reader import Crypto.Random -import Simplex.Messaging.Agent.Command import Simplex.Messaging.Agent.Env.SQLite +import Simplex.Messaging.Agent.Transmission import Simplex.Messaging.Transport import UnliftIO.Async import UnliftIO.IO diff --git a/src/Simplex/Messaging/Agent/Env/SQLite.hs b/src/Simplex/Messaging/Agent/Env/SQLite.hs index c10c7f9eb..3a0b3a3dd 100644 --- a/src/Simplex/Messaging/Agent/Env/SQLite.hs +++ b/src/Simplex/Messaging/Agent/Env/SQLite.hs @@ -12,8 +12,8 @@ import qualified Data.Map.Strict as M import qualified Database.SQLite.Simple as DB import Network.Socket (HostName, ServiceName) import Numeric.Natural -import Simplex.Messaging.Agent.Command import Simplex.Messaging.Agent.Store.SQLite.Schema +import Simplex.Messaging.Agent.Transmission import qualified Simplex.Messaging.Server.Transmission as SMP import UnliftIO.STM diff --git a/src/Simplex/Messaging/Agent/Store.hs b/src/Simplex/Messaging/Agent/Store.hs index c20a9efc6..dee6ec638 100644 --- a/src/Simplex/Messaging/Agent/Store.hs +++ b/src/Simplex/Messaging/Agent/Store.hs @@ -10,7 +10,7 @@ module Simplex.Messaging.Agent.Store where import Data.Kind import Data.Time.Clock (UTCTime) -import Simplex.Messaging.Agent.Command +import Simplex.Messaging.Agent.Transmission import Simplex.Messaging.Server.Transmission (Encoded, PublicKey, QueueId) data ReceiveQueue = ReceiveQueue diff --git a/src/Simplex/Messaging/Agent/Command.hs b/src/Simplex/Messaging/Agent/Transmission.hs similarity index 98% rename from src/Simplex/Messaging/Agent/Command.hs rename to src/Simplex/Messaging/Agent/Transmission.hs index cd4645d35..7e6640302 100644 --- a/src/Simplex/Messaging/Agent/Command.hs +++ b/src/Simplex/Messaging/Agent/Transmission.hs @@ -6,7 +6,7 @@ {-# LANGUAGE TypeFamilies #-} {-# OPTIONS_GHC -fno-warn-unticked-promoted-constructors #-} -module Simplex.Messaging.Agent.Command where +module Simplex.Messaging.Agent.Transmission where import Control.Monad.IO.Class import Data.ByteString.Char8 (ByteString)