diff options
author | Ben Sima <ben@bsima.me> | 2024-11-15 14:55:37 -0500 |
---|---|---|
committer | Ben Sima <ben@bsima.me> | 2024-12-21 10:06:49 -0500 |
commit | 6513755670892983db88a6633b8c1ea6019c03d1 (patch) | |
tree | 44e9eccdb7a3a74ab7e96a8fee7572dd6a78dc73 /Biz/Que | |
parent | ae7b7e0186b5f2e0dcd4d5fac0a71fa264caedc2 (diff) |
Re-namespace some stuff to Omni
I was getting confused about what is a product and what is internal
infrastructure; I think it is good to keep those things separate. So I moved a
bunch of stuff to an Omni namespace, actually most stuff went there. Only things
that are explicitly external products are still in the Biz namespace.
Diffstat (limited to 'Biz/Que')
-rw-r--r-- | Biz/Que/Host.hs | 8 | ||||
-rw-r--r-- | Biz/Que/Site.hs | 6 |
2 files changed, 7 insertions, 7 deletions
diff --git a/Biz/Que/Host.hs b/Biz/Que/Host.hs index da424df..a908d5b 100644 --- a/Biz/Que/Host.hs +++ b/Biz/Que/Host.hs @@ -26,10 +26,6 @@ module Biz.Que.Host where import Alpha hiding (gets, modify, poll) -import qualified Biz.Cli as Cli -import qualified Biz.Log as Log -import Biz.Test ((@=?)) -import qualified Biz.Test as Test import qualified Control.Concurrent.Go as Go import qualified Control.Concurrent.STM as STM import qualified Control.Exception as Exception @@ -37,6 +33,10 @@ import Data.HashMap.Lazy (HashMap) import qualified Data.HashMap.Lazy as HashMap import Network.HTTP.Media ((//), (/:)) import qualified Network.Wai.Handler.Warp as Warp +import qualified Omni.Cli as Cli +import qualified Omni.Log as Log +import Omni.Test ((@=?)) +import qualified Omni.Test as Test import Servant import Servant.Server.Generic (AsServerT, genericServeT) import qualified Servant.Types.SourceT as Source diff --git a/Biz/Que/Site.hs b/Biz/Que/Site.hs index 7151cd0..963927d 100644 --- a/Biz/Que/Site.hs +++ b/Biz/Que/Site.hs @@ -13,15 +13,15 @@ module Biz.Que.Site where import Alpha -import qualified Biz.Cli as Cli -import Biz.Test ((@=?)) -import qualified Biz.Test as Test import qualified Control.Concurrent.Async as Async import qualified Data.ByteString.Char8 as BS import qualified Data.Ini.Config as Config import qualified Data.Text as Text import qualified Data.Text.IO as Text import Network.HTTP.Req +import qualified Omni.Cli as Cli +import Omni.Test ((@=?)) +import qualified Omni.Test as Test import qualified System.Directory as Directory import System.FilePath ((</>)) import qualified System.Process as Process |