[FIX] commenting unfinished features

src/Gargantext/Components/FacetsTable.purs

@@ -40,18 +40,20 @@ thisModule = "Gargantext.Components.FacetsTable"
 ------------------------------------------------------------------------
 
 type Props =
-  ( chart :: R.Element
-  , container :: Record T.TableContainerProps -> R.Element
-  , frontends :: Frontends
-  , listId :: Int
-  , nodeId :: Int
-  , query :: SearchQuery
-  , session :: Session
+  ( chart        :: R.Element
+  , container    :: Record T.TableContainerProps -> R.Element
+  , frontends    :: Frontends
+  , listId       :: Int
+  , nodeId       :: Int
+  , query        :: SearchQuery
+  , session      :: Session
   , totalRecords :: Int
   )
 
 -- | Tracks the ids of documents to delete and that have been deleted
-type Deletions = { pending :: Set Int, deleted :: Set Int }
+type Deletions = { pending :: Set Int
+                 , deleted :: Set Int
+                 }
 
 initialDeletions :: Deletions
 initialDeletions = { pending: mempty, deleted: mempty }

src/Gargantext/Components/NgramsTable.purs

@@ -319,19 +319,19 @@ loadedNgramsTableCpt = R.hooksComponentWithModule thisModule "loadedNgramsTable"
         , versioned: Versioned { data: initTable }
         , withAutoUpdate } _ = do
 
-      let syncResetBtns = [
-        syncResetButtons { afterSync: chartsAfterSync
-                         , ngramsLocalPatch
-                         , performAction: performAction <<< CoreAction
-                         }
-        ]
+      let syncResetBtns = [ syncResetButtons 
+                            { afterSync: chartsAfterSync
+                            , ngramsLocalPatch
+                            , performAction: performAction <<< CoreAction
+                            }
+                          ]
 
       pure $ R.fragment $
         autoUpdate <> syncResetBtns <> [
-          H.h4 {style: {textAlign : "center"}} [
-              H.span {className: "glyphicon glyphicon-hand-down"} []
-            , H.text "Extracted Terms"
-            ]
+          H.h4 {style: {textAlign : "center"}}
+               [ H.span {className: "glyphicon glyphicon-hand-down"} []
+               , H.text "Extracted Terms"
+               ]
         , search
         , T.table { colNames
                   , container: tableContainer { dispatch: performAction
@@ -648,22 +648,20 @@ mainNgramsTablePaintCpt = R.hooksComponentWithModule thisModule "mainNgramsTable
               , withAutoUpdate } _ = do
       pathS <- R.useState' path
       state <- R.useState' $ initialState versioned
-
-      pure $ loadedNgramsTable {
-        afterSync
-      , appReload
-      , asyncTasksRef
-      , path: pathS
-      , sidePanelTriggers
-      , state
-      , tabNgramType
-      , treeReloadRef
-      , versioned
-      , withAutoUpdate
-      }
-
-type MainNgramsTablePaintNoCacheProps = (
-    pathS             :: R.State PageParams
+      pure $ loadedNgramsTable { afterSync
+                               , appReload
+                               , asyncTasksRef
+                               , path: pathS
+                               , sidePanelTriggers
+                               , state
+                               , tabNgramType
+                               , treeReloadRef
+                               , versioned
+                               , withAutoUpdate
+                               }
+
+type MainNgramsTablePaintNoCacheProps =
+  ( pathS             :: R.State PageParams
   , versioned         :: VersionedNgramsTable
   | CommonProps
   )

src/Gargantext/Components/NgramsTable/Components.purs

@@ -46,7 +46,7 @@ searchInputCpt = R.hooksComponentWithModule thisModule "searchInput" cpt
     cpt { onSearch, searchQuery } _ = 
       pure $ H.div { className: "input-group" }
            [ searchButton
-           , fieldInput searchQuery
+           , fieldInput
            ]
         where
           searchButton = 

src/Gargantext/Components/Nodes/Lists/Tabs.purs

@@ -153,8 +153,15 @@ ngramsViewCpt = R.hooksComponentWithModule thisModule "ngramsView" cpt
                        }
 
         charts params CTabTerms (chartType /\ setChartType) _ = [
-          H.div { className: "row chart-type-selector" } [
-            H.div { className: "col-md-3" } [
+          H.div {className: "row"}
+                [ H.div {className: "col-md-offset-5 col-md-6 content"}
+                  [ H.img { src: "images/Gargantextuel-212x300.jpg"
+                          , id: "funnyimg"
+                        }
+                  ]
+                ]
+
+          {-
               R2.select { className: "form-control"
                         , defaultValue: show chartType
                         , on: { change: \e -> setChartType
@@ -173,6 +180,7 @@ ngramsViewCpt = R.hooksComponentWithModule thisModule "ngramsView" cpt
             ]
           ]
         , getChartFunction chartType $ { path: params, session }
+        -}
         ]
         charts params _ _ _         = [ chart params mode ]