some cleaning
This commit is contained in:
parent
96409f3118
commit
f0a888decf
3 changed files with 7 additions and 12 deletions
|
@ -11,7 +11,6 @@ module Main where
|
|||
import Prelude as P
|
||||
|
||||
import Crypto.JWT hiding (Context, header)
|
||||
import Crypto.JOSE.JWK hiding (Context)
|
||||
|
||||
import Control.Concurrent.STM (newTQueueIO)
|
||||
import Control.Concurrent (forkIO)
|
||||
|
@ -20,9 +19,7 @@ import Servant
|
|||
import Servant.Server.Experimental.Auth
|
||||
import qualified Servant.OpenApi as OA
|
||||
import Servant.Swagger.UI
|
||||
import Servant.RawM
|
||||
|
||||
import qualified Data.Aeson as A
|
||||
import Servant.RawM.Server
|
||||
|
||||
import Data.Set as S (empty)
|
||||
import qualified Data.ByteString.Lazy as B
|
||||
|
|
|
@ -93,7 +93,6 @@ library
|
|||
, servant
|
||||
, servant-server
|
||||
, servant-openapi3
|
||||
, servant-rawm >= 0.3.0.0
|
||||
, servant-rawm-server
|
||||
, opaleye
|
||||
, aeson
|
||||
|
@ -151,7 +150,7 @@ executable mateamt
|
|||
, network
|
||||
, servant
|
||||
, servant-server
|
||||
, servant-rawm
|
||||
, servant-rawm-server
|
||||
, servant-openapi3
|
||||
, servant-swagger-ui
|
||||
, servant-swagger-ui-core
|
||||
|
|
11
src/API.hs
11
src/API.hs
|
@ -13,8 +13,7 @@ import Servant.Server
|
|||
|
||||
import Data.Proxy
|
||||
|
||||
import Servant.RawM
|
||||
import Servant.RawM.Server ()
|
||||
import Servant.RawM.Server
|
||||
|
||||
-- internal imports
|
||||
|
||||
|
@ -124,7 +123,7 @@ journalShowLink :: Maybe Int -> Maybe Int -> Link
|
|||
journalPostCheck :: Link
|
||||
|
||||
avatarGetLink :: Int -> Link
|
||||
avaterInsertLink :: Link
|
||||
avatarInsertLink :: Link
|
||||
avatarUpdateLink :: Int -> Link
|
||||
avatarListLink :: Link
|
||||
|
||||
|
@ -137,7 +136,7 @@ roleAssociationSubmitLink :: Link
|
|||
roleAssociationDeleteLink :: Link
|
||||
|
||||
settingsGetLink :: Link
|
||||
settingsUpdateLnk :: Link
|
||||
settingsUpdateLink :: Link
|
||||
|
||||
metaGetLink :: Link
|
||||
|
||||
|
@ -168,7 +167,7 @@ metaGetLink :: Link
|
|||
journalPostCheck :<|>
|
||||
|
||||
avatarGetLink :<|>
|
||||
avaterInsertLink :<|>
|
||||
avatarInsertLink :<|>
|
||||
avatarUpdateLink :<|>
|
||||
avatarListLink :<|>
|
||||
|
||||
|
@ -181,7 +180,7 @@ metaGetLink :: Link
|
|||
roleAssociationDeleteLink :<|>
|
||||
|
||||
settingsGetLink :<|>
|
||||
settingsUpdateLnk :<|>
|
||||
settingsUpdateLink :<|>
|
||||
|
||||
metaGetLink
|
||||
) = allLinks (Proxy :: Proxy MateAPI)
|
||||
|
|
Loading…
Reference in a new issue