Merge branch 'dev' into 544-dev-term-table-suggestion-fix-for-children

package.json

 {
     "name": "Gargantext",
-    "version": "0.0.6.9.9.4.2",
+    "version": "0.0.6.9.9.4.3",
     "scripts": {
         "generate-purs-packages-nix": "./nix/generate-purs-packages.nix",
         "generate-psc-packages-nix": "./nix/generate-packages-json.bash",

src/Gargantext/Components/Forest/Tree/Node/Action/Search/SearchField.purs

@@ -39,7 +39,7 @@ here = R2.here "Gargantext.Components.Forest.Tree.Node.Action.Search.SearchField
 
 defaultSearch :: Search
 defaultSearch = { databases    : Empty
-                , datafield    : Nothing
+                , datafield    : Just (External Empty)
                 , node_id      : Nothing
                 , lang         : Nothing
                 , term         : ""
@@ -350,6 +350,8 @@ databaseInputCpt = here.component "databaseInput" cpt
             (Just (External x)) -> Just x
             _                   -> Nothing
 
+          dbInputValue = fromMaybe "" $ dbToInputValue <$> db
+
           liItem :: Database -> R.Element
           liItem  db' = H.option { className : "text-primary center"
                                  , value: dbToInputValue db' } [ H.text (show db') ]
@@ -377,14 +379,12 @@ databaseInputCpt = here.component "databaseInput" cpt
         H.div { className: "form-group" }
         [ H.div {className: "text-primary center"} [ H.text "in database" ]
         , R2.select { className: "form-control"
-                    , defaultValue: defaultValue search'.datafield
+                    , defaultValue: dbInputValue
                     , on: { change }
                     } (liItem <$> databases)
         , H.div {className:"center"} [ H.text $ maybe "" doc db ]
         ]
 
-    defaultValue datafield = show $ maybe Empty datafield2database datafield
-
 
 type PubmedInputProps = (
     search :: T.Box Search