Skip to content

P
purescript-gargantext
Switch branch/tag
Find file
BlameHistoryPermalink
API.purs 588 Bytes
EditWeb IDE
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 
module Gargantext.Components.NgramsTable.API where

import Data.Either (Either)
import Effect.Aff (Aff)

import Gargantext.Config.REST (RESTError)
import Gargantext.Routes as GR
import Gargantext.Sessions (Session, post)
import Gargantext.Types as GT

type UpdateNodeListParams =
  (
    listId :: Int
  , nodeId :: Int
  , nodeType :: GT.TabSubType GT.CTabNgramType
  , session :: Session
  )

updateNodeList :: Record UpdateNodeListParams -> Aff (Either RESTError Int)
updateNodeList { listId, nodeId, nodeType, session } =
  post session (GR.RecomputeNgrams nodeType nodeId listId) {}