Skip to content

P
purescript-gargantext
Verified Commit cd80ccd7 authored by Przemyslaw Kaminski's avatar Przemyslaw Kaminski
Browse files
Options

[tree] add tooltip but only for NodeUser

parent 696b5822
Pipeline #6178 failed with stages
      in 5 minutes and 32 seconds
      Hide whitespace changes
      Inline Side-by-side
      Showing with 19 additions and 11 deletions
      src/Gargantext/Components/Forest/Tree/Node.purs
      View file @ cd80ccd7
      ...@@ -214,6 +214,22 @@ nodeSpanCpt = here.component "nodeSpan" cpt ...@@ -214,6 +214,22 @@ nodeSpanCpt = here.component "nodeSpan" cpt
      host <- R2.getPortalHost host <- R2.getPortalHost
      -- Tooltip
      let hasTooltip = nodeType == GT.NodeUser
      tooltipEl = if hasTooltip then
      nodeTooltip
      { id
      , nodeType
      , name
      }
      [
      case mVersion of
      Nothing -> mempty
      Just v -> versionComparator v
      ]
      else
      H.div {} []
      -- Render -- Render
      pure $ pure $
      ...@@ -235,17 +251,9 @@ nodeSpanCpt = here.component "nodeSpan" cpt ...@@ -235,17 +251,9 @@ nodeSpanCpt = here.component "nodeSpan" cpt
      -- // Abstract informations // -- // Abstract informations //
      -- nodeTooltip tooltipEl
      -- { id
      -- , nodeType ,
      -- , name
      -- }
      -- [
      -- case mVersion of
      -- Nothing -> mempty
      -- Just v -> versionComparator v
      -- ]
      -- ,
      R.createPortal R.createPortal
      [ [
      fileTypeView fileTypeView
      ......
      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