[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"
-                                                                         , "text-decoration": "underline"
-                                                                         }
-                                                                    else { color : ""
-                                                                         , "text-decoration": "none"
-                                                                         }
-                                                        , on: { click: onClick }
-                                                        }
-                                                        [ nodeText { isSelected: isSelected targetId valAction
-                                                                               , name: " " <> name
-                                                                               , handed
-                                                                               }
-                                                        ]
-                                       ]
-                            )
-                            <> children
+            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
+                           , name: " " <> name
+                           , handed
+                           }
+                , H.span { className: "children" } children
+                ]
+              ]
+            ]
       where
 
         SubTreeParams { valitypes } = subTreeParams