[searchfield] small refactoring

56657451 · Przemyslaw Kaminski · 594b5b92 · 56657451
Verified Commit 56657451 authored Jun 19, 2023 by Przemyslaw Kaminski
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 2 deletions

SearchField.purs ...omponents/Forest/Tree/Node/Action/Search/SearchField.purs +1 -2

No files found.
--- a/src/Gargantext/Components/Forest/Tree/Node/Action/Search/SearchField.purs
+++ b/src/Gargantext/Components/Forest/Tree/Node/Action/Search/SearchField.purs
@@ -417,8 +417,7 @@ pubmedInputCpt = here.component "pubmedInput" cpt where
        let mVal = case val of
              "" -> Nothing
              s  -> Just s
-        T.modify_ (\s ->
-                    s { datafield = Just (External (PubMed p { api_key = mVal })) }) search
+        T.modify_ (_ { datafield = Just (External (PubMed p { api_key = mVal })) }) search


 type OrgInputProps =