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
d6035ac6
Commit
d6035ac6
authored
Sep 14, 2020
by
Przemyslaw Kaminski
Browse files
Options
Browse Files
Download
Plain Diff
Merge branch 'dev' into dev-refactor-views-panel
parents
1b7683bc
d0e45551
Changes
5
Hide whitespace changes
Inline
Side-by-side
Showing
5 changed files
with
51 additions
and
49 deletions
+51
-49
Tree.css
dist/styles/Tree.css
+9
-9
Tree.sass
dist/styles/Tree.sass
+25
-23
Tree.purs
src/Gargantext/Components/Forest/Tree.purs
+1
-1
Node.purs
src/Gargantext/Components/Forest/Tree/Node.purs
+15
-15
SubTree.purs
...Gargantext/Components/Forest/Tree/Node/Tools/SubTree.purs
+1
-1
No files found.
dist/styles/Tree.css
View file @
d6035ac6
...
...
@@ -54,15 +54,15 @@ li .leaf:hover a.settings {
margin-right
:
19px
;
}
.tree
.lefthanded
ul
li
{
margin-right
:
1
5
px
;
margin-right
:
1
0
px
;
padding-right
:
5px
;
}
.tree
.lefthanded
ul
li
::after
{
.tree
.lefthanded
ul
li
.with-children
::after
{
background-color
:
#000
;
right
:
-10px
;
width
:
10
px
;
width
:
5
px
;
}
.tree
.lefthanded
ul
li
::before
{
.tree
.lefthanded
ul
li
.with-children
::before
{
background-color
:
#000
;
right
:
-10px
;
width
:
1px
;
...
...
@@ -74,20 +74,20 @@ li .leaf:hover a.settings {
margin-left
:
19px
;
}
.tree
.righthanded
ul
li
{
margin-left
:
1
5
px
;
margin-left
:
1
0
px
;
padding-left
:
5px
;
}
.tree
.righthanded
ul
li
::after
{
.tree
.righthanded
ul
li
.with-children
::after
{
background-color
:
#000
;
left
:
-10px
;
width
:
10
px
;
width
:
5
px
;
}
.tree
.righthanded
ul
li
::before
{
.tree
.righthanded
ul
li
.with-children
::before
{
background-color
:
#000
;
left
:
-10px
;
width
:
1px
;
}
.tree
.righthanded
ul
li
:only::before
{
.tree
.righthanded
ul
li
.with-children
:only::before
{
background-color
:
#000
;
right
:
10px
;
}
...
...
dist/styles/Tree.sass
View file @
d6035ac6
...
...
@@ -48,37 +48,39 @@ li
ul
margin-right
:
19px
li
margin-right
:
1
5
px
margin-right
:
1
0
px
padding-right
:
5px
&
:
:
after
background-color
:
#000
right
:
-10px
width
:
10px
&
:
:
before
background-color
:
#000
right
:
-10px
width
:
1px
&
:
only-child
::
before
//right: 1px
&
.with-children
&
:
:
after
background-color
:
#000
right
:
-10px
width
:
5px
&
:
:
before
background-color
:
#000
right
:
-10px
width
:
1px
&
:
only-child
::
before
//right: 1px
.leaf
justify-content
:
flex-end
.righthanded
ul
margin-left
:
19px
li
margin-left
:
1
5
px
margin-left
:
1
0
px
padding-left
:
5px
&
:
:
after
background-color
:
#000
left
:
-10px
width
:
10px
&
:
:
before
background-color
:
#000
left
:
-10px
width
:
1px
&
:
only
::
before
background-color
:
#000
right
:
10px
&
.with-children
&
:
:
after
background-color
:
#000
left
:
-10px
width
:
5px
&
:
:
before
background-color
:
#000
left
:
-10px
width
:
1px
&
:
only
::
before
background-color
:
#000
right
:
10px
.leaf
justify-content
:
flex-start
...
...
src/Gargantext/Components/Forest/Tree.purs
View file @
d6035ac6
...
...
@@ -199,7 +199,7 @@ toHtml p@{ asyncTasks
let withId (NTree (LNode {id: id'}) _) = id'
pure $ H.li {} $
pure $ H.li {
className: if A.null ary then "no-children" else "with-children"
} $
[ nodeMainSpan (A.null ary)
{ id
, dispatch: pAction
...
...
src/Gargantext/Components/Forest/Tree/Node.purs
View file @
d6035ac6
...
...
@@ -74,16 +74,16 @@ nodeMainSpan isLeaf p@{ dispatch, folderOpen, frontends, handed, session } = R.c
[ folderIcon nodeType folderOpen
, chevronIcon isLeaf handed nodeType folderOpen
, nodeLink { frontends
, id
, isSelected: mCurrentRoute
== Routes.nodeTypeAppRoute
nodeType
(sessionId session) id
, name: name' props
, nodeType
, session
, handed
}
, id
, isSelected: mCurrentRoute
== Routes.nodeTypeAppRoute
nodeType
(sessionId session) id
, name: name' props
, nodeType
, session
, handed
}
, fileTypeView { dispatch, droppedFile, id, isDragOver, nodeType }
, H.div {} (map (\t -> asyncProgressBar { asyncTask: t
...
...
@@ -93,7 +93,7 @@ nodeMainSpan isLeaf p@{ dispatch, folderOpen, frontends, handed, session } = R.c
, session
}
) tasks
)
)
, if nodeType == GT.NodeUser
then GV.versionView {session}
else H.div {} []
...
...
@@ -111,10 +111,10 @@ nodeMainSpan isLeaf p@{ dispatch, folderOpen, frontends, handed, session } = R.c
, nodeActions { id
, nodeType
, refreshTree: const $ dispatch RefreshTree
, session
}
, nodeType
, refreshTree: const $ dispatch RefreshTree
, session
}
]
...
...
src/Gargantext/Components/Forest/Tree/Node/Tools/SubTree.purs
View file @
d6035ac6
...
...
@@ -157,7 +157,7 @@ subTreeTreeViewCpt = R2.hooksComponent thisModule "subTreeTreeViewCpt" cpt
(Just (SubTreeOut {out})) -> n == out
onClick e = do
let action = if validNodeType then Nothing else Just $ SubTreeOut { in: id, out: targetId }
let action = if
not
validNodeType then Nothing else Just $ SubTreeOut { in: id, out: targetId }
E.preventDefault e
E.stopPropagation e
setAction $ const $ setTreeOut valAction action
...
...
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