diff options
Diffstat (limited to 'Run/Que/Server.hs')
| -rw-r--r-- | Run/Que/Server.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Run/Que/Server.hs b/Run/Que/Server.hs index 70bc559..e807502 100644 --- a/Run/Que/Server.hs +++ b/Run/Que/Server.hs @@ -20,7 +20,7 @@ module Run.Que.Server ) where -import Com.Simatime.Alpha hiding ( Text +import Alpha hiding ( Text , get , gets , modify @@ -147,7 +147,7 @@ routes = do app . modify <| upsertNamespace ns q <- app <| que ns qp qdata <- Scotty.body - _ <- liftIO <| Go.write q <| BSL.toStrict qdata + _ <- liftIO <| Go.write q <| BSL.toStrict qdata return () -- | Given `guardNs ns whitelist`, if `ns` is not in the `whitelist` |