Skip to content

P
purescript-gargantext
Commit 57fa0591 authored by Fabien Manière's avatar Fabien Manière
Browse files
Options

Corpus Form to import from pads: change default value All to EN

parent fbbe4000
Pipeline #4625 failed with stage
    in 0 seconds
    Hide whitespace changes
    Inline Side-by-side
    Showing with 3 additions and 1 deletion
    src/Gargantext/Components/Forest/Tree/Node/Action/WriteNodesDocuments.purs
    View file @ 57fa0591
    ...@@ -62,8 +62,10 @@ actionWriteNodesDocumentsWithLangsCpt :: R.Component ActionWriteNodesDocumentsWi ...@@ -62,8 +62,10 @@ actionWriteNodesDocumentsWithLangsCpt :: R.Component ActionWriteNodesDocumentsWi
    actionWriteNodesDocumentsWithLangsCpt = here.component "actionWriteNodesDocumentsWithLangs" cpt where actionWriteNodesDocumentsWithLangsCpt = here.component "actionWriteNodesDocumentsWithLangs" cpt where
    cpt { dispatch, id, langs, session } _ = do cpt { dispatch, id, langs, session } _ = do
    -- lang' /\ langBox
    -- <- R2.useBox' $ fromMaybe EN $ A.head langs
    lang' /\ langBox lang' /\ langBox
    <- R2.useBox' $ fromMaybe EN $ A.head langs <- R2.useBox' EN
    selection' /\ selectionBox selection' /\ selectionBox
    <- R2.useBox' ListSelection.MyListsFirst <- R2.useBox' ListSelection.MyListsFirst
    paragraphs' /\ paragraphBox paragraphs' /\ paragraphBox
    ......
    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