Commit 4aa80407 authored by Alexandre Delanoë's avatar Alexandre Delanoë

[FIX] SubTree clickable node

parent a9c140b9
......@@ -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
......
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