Skip to content

P
purescript-gargantext
Verified Commit a6c29d63 authored by Przemyslaw Kaminski's avatar Przemyslaw Kaminski
Browse files
Options

[istex] add possibility to upload istex zip files

parent a1582eaa
Pipeline #5215 canceled with stage
    Hide whitespace changes
    Inline Side-by-side
    Showing with 3 additions and 1 deletion
    src/Gargantext/Components/Forest/Tree/Node/Action/Upload.purs
    View file @ a6c29d63
    ...@@ -155,6 +155,7 @@ uploadFileViewWithLangsCpt = here.component "uploadFileViewWithLangs" cpt ...@@ -155,6 +155,7 @@ uploadFileViewWithLangsCpt = here.component "uploadFileViewWithLangs" cpt
    [ H.div {className:"col-6 flex-space-around"} [ H.div {className:"col-6 flex-space-around"}
    [ formChoiceSafe { items: [ CSV [ formChoiceSafe { items: [ CSV
    , CSV_HAL , CSV_HAL
    , Istex
    , WOS , WOS
    , JSON , JSON
    -- , Iramuteq -- , Iramuteq
    ......
    src/Gargantext/Components/Forest/Tree/Node/Action/Upload/Types.purs
    View file @ a6c29d63
    ...@@ -13,7 +13,7 @@ import Web.File.Blob (Blob, size) ...@@ -13,7 +13,7 @@ import Web.File.Blob (Blob, size)
    import Web.File.FileReader.Aff (readAsArrayBuffer, readAsText) import Web.File.FileReader.Aff (readAsArrayBuffer, readAsText)
    data FileType = CSV | CSV_HAL | WOS | PresseRIS | Arbitrary | JSON | Iramuteq data FileType = CSV | CSV_HAL | Istex | WOS | PresseRIS | Arbitrary | JSON | Iramuteq
    derive instance Generic FileType _ derive instance Generic FileType _
    instance Eq FileType where eq = genericEq instance Eq FileType where eq = genericEq
    ...@@ -23,6 +23,7 @@ instance Read FileType where ...@@ -23,6 +23,7 @@ instance Read FileType where
    read "Arbitrary" = Just Arbitrary read "Arbitrary" = Just Arbitrary
    read "CSV" = Just CSV read "CSV" = Just CSV
    read "CSV_HAL" = Just CSV_HAL read "CSV_HAL" = Just CSV_HAL
    read "Istex" = Just Istex
    read "PresseRIS" = Just PresseRIS read "PresseRIS" = Just PresseRIS
    read "WOS" = Just WOS read "WOS" = Just WOS
    read "JSON" = Just JSON read "JSON" = Just JSON
    ......
    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