[tree] fixes to subtree css

dist/styles/Tree.css

@@ -63,4 +63,11 @@
   opacity: var(--over50, 0);
 }
 
+#node-popup-tooltip .tree .node {
+  margin-top: 5px;
+}
+#node-popup-tooltip .tree .children .node {
+  padding-left: 15px;
+}
+
 /*# sourceMappingURL=Tree.css.map */

dist/styles/Tree.sass

@@ -60,3 +60,11 @@
 
     &:after
       opacity: var(--over50, 0)
+
+#node-popup-tooltip
+  .tree
+    .node
+      margin-top: 5px
+    .children
+      .node
+        padding-left: 15px

src/Gargantext/Components/Forest/Tree/Node/Tools/SubTree.purs

@@ -118,24 +118,25 @@ subTreeTreeViewCpt = R2.hooksComponent thisModule "subTreeTreeViewCpt" cpt
                     GT.LeftHanded  -> A.reverse
                     GT.RightHanded -> identity
 
-            pure $ H.div {} $ (ordering [ H.div { className: "node " <> GT.fldr nodeType true} []
-                                        , H.span { style : if validNodeType
-                                                                    then { color : "blue"
+            pure $ H.div {} $ ordering [
+              H.div { className: "node " <> GT.fldr nodeType true} [
+                H.span { style : if validNodeType then
+                                   { color : "blue"
                                    , "text-decoration": "underline"
                                    }
                                   else { color : ""
                                        , "text-decoration": "none"
                                        }
                        , on: { click: onClick }
-                                                        }
-                                                        [ nodeText { isSelected: isSelected targetId valAction
+                       } [
+                  nodeText { isSelected: isSelected targetId valAction
                            , name: " " <> name
                            , handed
                            }
+                , H.span { className: "children" } children
+                ]
               ]
             ]
-                            )
-                            <> children
       where
 
         SubTreeParams { valitypes } = subTreeParams