Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
P
purescript-gargantext
Project
Project
Details
Activity
Releases
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
Grégoire Locqueville
purescript-gargantext
Commits
2b4fd184
Commit
2b4fd184
authored
Jun 17, 2020
by
Alexandre Delanoë
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
[FIX] update api ok
parent
75fa6dfa
Changes
2
Show whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
10 additions
and
11 deletions
+10
-11
Update.purs
...Gargantext/Components/Forest/Tree/Node/Action/Update.purs
+9
-9
Types.purs
src/Gargantext/Types.purs
+1
-2
No files found.
src/Gargantext/Components/Forest/Tree/Node/Action/Update.purs
View file @
2b4fd184
...
...
@@ -9,7 +9,7 @@ import Gargantext.Components.Forest.Tree.Node.Tools (formChoiceSafe, submitButto
import Gargantext.Types (NodeType(..), ID)
import Gargantext.Types as GT
import Gargantext.Prelude (Unit, bind, ($), pure)
import Gargantext.Sessions (Session, p
u
t)
import Gargantext.Sessions (Session, p
os
t)
import Gargantext.Routes as GR
import Reactix as R
import Reactix.DOM.HTML as H
...
...
@@ -17,28 +17,28 @@ import Reactix.DOM.HTML as H
updateRequest :: UpdateNodeParams -> Session -> ID -> Aff GT.AsyncTaskWithType
updateRequest (UpdateNodeParamsList meth) session nodeId = do
task <- p
u
t session p meth
task <- p
os
t session p meth
pure $ GT.AsyncTaskWithType {task, typ: GT.UpdateNode } -- TODO add NodeType
where
p = GR.NodeAPI GT.Node (Just nodeId)
(GT.asyncTaskTypePath GT.UpdateNode)
p = GR.NodeAPI GT.Node (Just nodeId)
"update/nobody"
updateRequest (UpdateNodeParamsGraph meth) session nodeId = do
task <- p
u
t session p meth
task <- p
os
t session p meth
pure $ GT.AsyncTaskWithType {task, typ: GT.UpdateNode } -- TODO add NodeType
where
p = GR.NodeAPI GT.Node (Just nodeId)
(GT.asyncTaskTypePath GT.UpdateNode)
p = GR.NodeAPI GT.Node (Just nodeId)
"update/nobody"
updateRequest (UpdateNodeParamsTexts meth) session nodeId = do
task <- p
u
t session p meth
task <- p
os
t session p meth
pure $ GT.AsyncTaskWithType {task, typ: GT.UpdateNode } -- TODO add NodeType
where
p = GR.NodeAPI GT.Node (Just nodeId)
(GT.asyncTaskTypePath GT.UpdateNode)
p = GR.NodeAPI GT.Node (Just nodeId)
"update/nobody"
updateRequest (UpdateNodeParamsBoard meth) session nodeId = do
task <- p
u
t session p meth
task <- p
os
t session p meth
pure $ GT.AsyncTaskWithType {task, typ: GT.UpdateNode } -- TODO add NodeType
where
p = GR.NodeAPI GT.Node (Just nodeId)
(GT.asyncTaskTypePath GT.UpdateNode)
p = GR.NodeAPI GT.Node (Just nodeId)
"update/nobody"
----------------------------------------------------------------------
...
...
src/Gargantext/Types.purs
View file @
2b4fd184
...
...
@@ -498,8 +498,7 @@ asyncTaskTypePath Form = "add/form/async/"
asyncTaskTypePath Query = "query/"
asyncTaskTypePath GraphT = "async/"
asyncTaskTypePath AddNode = "async/nobody/"
asyncTaskTypePath UpdateNode = "async/nobody/"
asyncTaskTypePath UpdateNode = "update/"
type AsyncTaskID = String
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment