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
142
Issues
142
List
Board
Labels
Milestones
Merge Requests
4
Merge Requests
4
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
gargantext
purescript-gargantext
Commits
a983df66
Commit
a983df66
authored
Nov 22, 2019
by
Alexandre Delanoë
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
[FOREST] CSS.
parent
bbadc949
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
24 additions
and
22 deletions
+24
-22
Rename.purs
...Gargantext/Components/Forest/Tree/Node/Action/Rename.purs
+1
-1
Box.purs
src/Gargantext/Components/Forest/Tree/Node/Box.purs
+23
-21
No files found.
src/Gargantext/Components/Forest/Tree/Node/Action/Rename.purs
View file @
a983df66
...
...
@@ -55,7 +55,7 @@ renameBox d p (true /\ setRenameBoxOpen) = R.createElement el p []
renameBox _ p (false /\ _) = R.createElement el p []
where
el = R.hooksComponent "RenameBox" cpt
cpt {name} _ = pure $ H.div {} [
H.text name
]
cpt {name} _ = pure $ H.div {} []
-- END Rename Box
...
...
src/Gargantext/Components/Forest/Tree/Node/Box.purs
View file @
a983df66
...
...
@@ -195,8 +195,8 @@ nodePopupView d p mPop@(Just NodePopup /\ setPopupOpen) = R.createElement el p [
[ H.div { className: "panel panel-default" }
[ H.div {className: ""}
[ H.div { className : "col-md-11"}
[ H.h3 { className: fldr nodeType true} []
, H.
div {} [ H.text $ show nodeType
]
[ H.h3 { className: fldr nodeType true} [
H.text $ show nodeType
]
, H.
p {className: "text-primary center"} [H.text name
]
]
]
, panelHeading renameBoxOpen
...
...
@@ -231,28 +231,30 @@ nodePopupView d p mPop@(Just NodePopup /\ setPopupOpen) = R.createElement el p [
panelHeading renameBoxOpen@(open /\ _) =
H.div {className: "panel-heading"}
[ -- H.h1 {className : "col-md-12"} [H.text "Settings Box"]
H.div {className: "row" }
[
H.div {className: "col-md-8"} [ renameBox d {id, name, nodeType} renameBoxOpen ]
, H.div {className: "flex-end"} [
if edit then editIcon renameBoxOpen else H.div {} []
, H.div {className: "col-md-1"}
[ H.a { "type" : "button"
, className: glyphicon "remove-circle"
, onClick: mkEffectFn1 $ \_ -> setPopupOpen $ const Nothing
, title: "Close"} []
]
]
]
]
[ H.div {className: "row" }
[ H.div {className: "col-md-8"}
[ renameBox d {id, name, nodeType} renameBoxOpen ]
, H.div {className: "flex-end"}
[ if edit then editIcon renameBoxOpen else H.div {} []
, H.div {className: "col-md-1"}
[ H.a { "type" : "button"
, className: glyphicon "remove-circle"
, onClick : mkEffectFn1
$ \_ -> setPopupOpen $ const Nothing
, title : "Close"} []
]
]
]
]
where
editIcon (false /\ setRenameBoxOpen) =
H.div {className: "col-md-1"}
H.div {className
: "col-md-1"}
[ H.a { className: glyphicon "pencil"
, id: "rename1"
, title: "Rename"
, onClick: mkEffectFn1 $ \_ -> setRenameBoxOpen $ const true
, id : "rename1"
, title : "Rename"
, onClick : mkEffectFn1
$ \_ -> setRenameBoxOpen $ const true
}
[]
]
...
...
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