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
a8ba5031
Commit
a8ba5031
authored
Sep 26, 2022
by
Alexandre Delanoë
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
[FIX] change leader to owner
parent
9e3eeab9
Changes
2
Show whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
7 additions
and
7 deletions
+7
-7
ManageTeam.purs
...antext/Components/Forest/Tree/Node/Action/ManageTeam.purs
+5
-5
Team.purs
src/Gargantext/Components/GraphQL/Team.purs
+2
-2
No files found.
src/Gargantext/Components/Forest/Tree/Node/Action/ManageTeam.purs
View file @
a8ba5031
...
...
@@ -55,13 +55,13 @@ teamLayoutWrapper = R.createElement teamLayoutWrapperCpt
teamLayoutWrapperCpt :: R.Component TeamProps
teamLayoutWrapperCpt = here.component "teamLayoutWrapper" cpt where
cpt {nodeId, session, team: {team_
lead
er_username, team_members}} _ = do
cpt {nodeId, session, team: {team_
own
er_username, team_members}} _ = do
teamS <- T.useBox team_members
team' <- T.useLive T.unequal teamS
error <- T.useBox ""
error' <- T.useLive T.unequal error
pure $ teamLayoutRows {nodeId, session, team: teamS, team', error, error', team_
lead
er_username}
pure $ teamLayoutRows {nodeId, session, team: teamS, team', error, error', team_
own
er_username}
type TeamRowProps =
( nodeId :: ID
...
...
@@ -70,7 +70,7 @@ type TeamRowProps =
, error :: T.Box String
, team' :: Array TeamMember
, error' :: String
, team_
lead
er_username :: String
, team_
own
er_username :: String
)
teamLayoutRows :: R2.Leaf TeamRowProps
...
...
@@ -78,12 +78,12 @@ teamLayoutRows = R2.leafComponent teamLayoutRowsCpt
teamLayoutRowsCpt :: R.Component TeamRowProps
teamLayoutRowsCpt = here.component "teamLayoutRows" cpt where
cpt { team, nodeId, session, error, team', error', team_
lead
er_username} _ = do
cpt { team, nodeId, session, error, team', error', team_
own
er_username} _ = do
case null team' of
true -> pure $ H.div { style: {margin: "10px"}}
[ H.h4 {} [H.text "Your team is empty, you can send some invitations."]]
false -> pure $ Tools.panel (makeLeader team_
lead
er_username : (map makeTeam team')) (H.div {} [H.text error'])
false -> pure $ Tools.panel (makeLeader team_
own
er_username : (map makeTeam team')) (H.div {} [H.text error'])
where
makeTeam :: TeamMember -> R.Element
...
...
src/Gargantext/Components/GraphQL/Team.purs
View file @
a8ba5031
...
...
@@ -6,7 +6,7 @@ import GraphQL.Client.Args (NotNull, (=>>))
import GraphQL.Client.Variable (Var(..))
type Team
= { team_
lead
er_username :: String
= { team_
own
er_username :: String
, team_members :: Array TeamMember
}
...
...
@@ -22,7 +22,7 @@ type TeamDeleteM
}
teamQuery = { team: { team_node_id: Var :: _ "id" Int } =>>
{ team_
lead
er_username: unit
{ team_
own
er_username: unit
, team_members: { username: unit
, shared_folder_id: unit
}
...
...
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