From d02b66cbe1f78b845cfaf3cc40e8001e3065d200 Mon Sep 17 00:00:00 2001
From: Przemek Kaminski <pk@intrepidus.pl>
Date: Thu, 14 May 2020 09:08:54 +0200
Subject: [PATCH] [ngrams] move search up the tree

Now focus works.
---
 src/Gargantext/Components/NgramsTable.purs | 7 ++-----
 src/Gargantext/Utils/Reactix.purs          | 5 +++++
 2 files changed, 7 insertions(+), 5 deletions(-)

diff --git a/src/Gargantext/Components/NgramsTable.purs b/src/Gargantext/Components/NgramsTable.purs
index 5c4ac23a..374ac36b 100644
--- a/src/Gargantext/Components/NgramsTable.purs
+++ b/src/Gargantext/Components/NgramsTable.purs
@@ -291,10 +291,6 @@ searchInputCpt = R.hooksComponent "G.C.NT.searchInput" cpt
                      , placeholder: "Search"
                      , type: "value" }
 
-toggleMaybe :: forall a. a -> Maybe a -> Maybe a
-toggleMaybe _ (Just _) = Nothing
-toggleMaybe b Nothing  = Just b
-
 -- NEXT
 data Action'
   = SetParentResetChildren' (Maybe NgramsTerm)
@@ -353,7 +349,8 @@ loadedNgramsTableSpecCpt = R.hooksComponent "G.C.NT.loadedNgramsTable" cpt
 
       pure $ R.fragment $
         autoUpdate <> resetSaveButtons <> [
-          T.table { colNames
+          search
+        , T.table { colNames
                   , container: tableContainer { dispatch: performAction
                                               , ngramsChildren
                                               , ngramsParent
diff --git a/src/Gargantext/Utils/Reactix.purs b/src/Gargantext/Utils/Reactix.purs
index bd23ceef..4db36969 100644
--- a/src/Gargantext/Utils/Reactix.purs
+++ b/src/Gargantext/Utils/Reactix.purs
@@ -300,3 +300,8 @@ foreign import _setCookie :: EffectFn1 String Unit
 
 setCookie :: String -> Effect Unit
 setCookie = runEffectFn1 _setCookie
+
+focus :: Nullable R.Element -> Effect Unit
+focus nEl = case toMaybe nEl of
+  Nothing -> pure unit
+  Just el -> el ... "focus" $ []
-- 
2.21.0