Skip to content

haskell-gargantext
haskell-gargantext
Commit 7e11e73f authored by Justin Woo's avatar Justin Woo
Browse files
Options

lists endpoint should accept JSON

parent 8094cd18
Pipeline #787 failed with stage
    Hide whitespace changes
    Inline Side-by-side
    Showing with 1 addition and 1 deletion
    src/Gargantext/API/Ngrams/List.hs
    View file @ 7e11e73f
    ......@@ -50,7 +50,7 @@ import Servant.Job.Utils (jsonOptions)
    ------------------------------------------------------------------------
    type NgramsList = (Map NgramsType (Versioned NgramsTableMap))
    ------------------------------------------------------------------------
    type API = Get '[HTML] (Headers '[Header "Content-Disposition" Text] NgramsList)
    type API = Get '[JSON, HTML] (Headers '[Header "Content-Disposition" Text] NgramsList)
    -- :<|> ReqBody '[JSON] NgramsList :> Post '[JSON] Bool
    :<|> PostAPI
    ......
    Markdown is supported
    0% or
    You are about to add 0 people to the discussion. Proceed with caution.
    Finish editing this message first!
    Please register or to comment