From 7f3965da42f5ea57717325f522bff579f46b8542 Mon Sep 17 00:00:00 2001
From: Karen Konou <konoukaren@gmail.com>
Date: Sat, 15 Apr 2023 12:04:22 +0200
Subject: [PATCH] [Tree] reset pins button
---
src/Gargantext/Components/Forest.purs | 23 ++++++++++++++++++++---
1 file changed, 20 insertions(+), 3 deletions(-)
diff --git a/src/Gargantext/Components/Forest.purs b/src/Gargantext/Components/Forest.purs
index dc76ff46..74e6ba09 100644
--- a/src/Gargantext/Components/Forest.purs
+++ b/src/Gargantext/Components/Forest.purs
@@ -6,6 +6,7 @@ module Gargantext.Components.Forest
import Gargantext.Prelude
import Data.Array as A
+import Data.Map (empty)
import Data.Map as Map
import Data.Maybe (Maybe(..), fromMaybe)
import Gargantext.Components.App.Store (Boxes)
@@ -83,7 +84,7 @@ plus :: R2.Leaf Plus
plus = R2.leaf plusCpt
plusCpt :: R.Component Plus
plusCpt = here.component "plus" cpt where
- cpt { boxes: { backend, showLogin } } _ = do
+ cpt { boxes: { backend, showLogin, pinnedTreeId} } _ = do
-- Hooks
{ goToRoute } <- useLinkHandler
@@ -102,7 +103,7 @@ plusCpt = here.component "plus" cpt where
[
B.tooltipContainer
{ delayShow: 600
- , position: TooltipPosition Top
+ , position: TooltipPosition Right
, tooltipSlot:
B.span_ "Back to home"
, defaultSlot:
@@ -118,7 +119,23 @@ plusCpt = here.component "plus" cpt where
,
B.tooltipContainer
{ delayShow: 600
- , position: TooltipPosition Top
+ , position: TooltipPosition Right
+ , tooltipSlot:
+ B.span_ "Reset pins"
+ , defaultSlot:
+ B.button
+ { className: "forest-layout__action__button"
+ , callback: \_ -> T.write_ empty pinnedTreeId
+ , variant: ButtonVariant Light
+ }
+ [
+ B.icon { name: "refresh" }
+ ]
+ }
+ ,
+ B.tooltipContainer
+ { delayShow: 600
+ , position: TooltipPosition Right
, tooltipSlot:
B.span_ "Add or remove connection to the server(s)"
, defaultSlot:
--
2.21.0