Commit 80744e7c authored by Alexandre Delanoë's avatar Alexandre Delanoë

[ERGO/DOC] closing if selected already

parent 8ae4a3bb
...@@ -215,12 +215,12 @@ buttonClickCpt = R.hooksComponent "G.C.F.T.N.B.buttonClick" cpt ...@@ -215,12 +215,12 @@ buttonClickCpt = R.hooksComponent "G.C.F.T.N.B.buttonClick" cpt
[] []
] ]
where where
{- -- This shows the Help of this button -- | Open the help indications if selected already
undo = setNodePopup doToDo = setNodePopup $ const $ node { action = todo' }
$ const (node { action = Nothing }) where
-} todo' = case action == Just todo of
true -> Nothing
doToDo = setNodePopup $ const $ node { action = Just todo } false -> Just todo
iconAStyle :: GT.NodeType -> NodeAction -> { iconAStyle :: GT.NodeType -> NodeAction -> {
color :: String color :: String
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment