fixed the name of the file

d05e9762 · mzheng · d752d875 · d05e9762
Commit d05e9762 authored Apr 11, 2024 by mzheng
Hide whitespace changes
Inline Side-by-side

Showing with 3 additions and 3 deletions

Export.hs src/Gargantext/API/Node/Phylo/Export.hs +3 -3

No files found.
--- a/src/Gargantext/API/Node/Phylo/Export.hs
+++ b/src/Gargantext/API/Node/Phylo/Export.hs
@@ -41,7 +41,7 @@ getTest :: NodeId
    -> PhyloId
    -> GargNoServer (Headers '[Header "Content-Disposition" T.Text] User)
 getTest _ pId = pure $ addHeader (T.concat [ "attachment; filename="
-                                          , "GarganText_DocsList-"
+                                          , "GarganText_Phylo-"
                                          , T.pack (show pId)
                                          , ".json" ])
                                          User {
@@ -55,9 +55,9 @@ getTest2 :: NodeId
    -> PhyloId
    -> GargNoServer (Headers '[Header "Content-Disposition" T.Text] User)
 getTest2 _ pId = pure $ addHeader (T.concat [ "attachment; filename="
-                                          , "GarganText_DocsList-"
+                                          , "GarganText_Phylo-"
                                          , T.pack (show pId)
-                                          , ".json" ])
+                                          , ".dot" ])
                                          User {
                                              _us_name = "test2"
                                            , _us_age = 82