Skip to content

P
purescript-gargantext
Commit 306fc14a authored by Przemyslaw Kaminski's avatar Przemyslaw Kaminski
Browse files
Options

[istex] [temporary] fixes to query

parent a0974175
Pipeline #2849 canceled with stage
    Hide whitespace changes
    Inline Side-by-side
    Showing with 2 additions and 2 deletions
    src/Gargantext/Components/Forest/Tree/Node/Action/Search/Types.purs
    View file @ 306fc14a
    ...@@ -261,12 +261,12 @@ instance GT.ToQuery SearchQuery where ...@@ -261,12 +261,12 @@ instance GT.ToQuery SearchQuery where
    [ QP.keyFromString k /\ Just (QP.valueFromString $ show v) ] [ QP.keyFromString k /\ Just (QP.valueFromString $ show v) ]
    instance JSON.WriteForeign SearchQuery where instance JSON.WriteForeign SearchQuery where
    writeImpl (SearchQuery { databases, datafield, lang, node_id, query, selection }) = writeImpl (SearchQuery { databases, datafield, lang, node_id, query, selection }) =
    JSON.writeImpl { query: String.replace (String.Pattern "\"") (String.Replacement "\\\"") query JSON.writeImpl { query -- query: String.replace (String.Pattern "\"") (String.Replacement "\\\"") query
    , databases , databases
    , datafield , datafield
    , flowListWith: selection
    , lang: maybe "EN" show lang , lang: maybe "EN" show lang
    , node_id: fromMaybe 0 node_id , node_id: fromMaybe 0 node_id
    , flowListWith: selection
    } }
    defaultSearchQuery :: SearchQuery defaultSearchQuery :: SearchQuery
    ......
    Markdown is supported
    0% or
    You are about to add 0 people to the discussion. Proceed with caution.
    Finish editing this message first!
    Please register or to comment