Commit 98305607 authored by Alexandre Delanoë's avatar Alexandre Delanoë

[TOOLING] using Clippy and renaming function to export book

parent e42661a8
...@@ -357,7 +357,7 @@ library ...@@ -357,7 +357,7 @@ library
RankNTypes RankNTypes
RecordWildCards RecordWildCards
StrictData StrictData
ghc-options: -Wall -Wincomplete-uni-patterns -Wincomplete-record-updates -Wmissing-signatures -Wunused-binds -Wunused-imports -Werror -freduction-depth=300 ghc-options: -Wall -Wincomplete-uni-patterns -Wincomplete-record-updates -Wmissing-signatures -Wunused-binds -Wunused-imports -Werror -freduction-depth=300 -fplugin=Clippy
build-depends: build-depends:
HSvm HSvm
, KMP , KMP
...@@ -416,6 +416,7 @@ library ...@@ -416,6 +416,7 @@ library
, fullstop , fullstop
, gargantext-graph >=0.1.0.0 , gargantext-graph >=0.1.0.0
, gargantext-prelude , gargantext-prelude
, ghc-clippy-plugin
, graphviz , graphviz
, hashable , hashable
, haskell-igraph , haskell-igraph
......
...@@ -16,7 +16,8 @@ copyright: ...@@ -16,7 +16,8 @@ copyright:
- ! 'Copyright: (c) 2017-Present: see git logs and README' - ! 'Copyright: (c) 2017-Present: see git logs and README'
license: AGPL-3 license: AGPL-3
homepage: https://gargantext.org homepage: https://gargantext.org
ghc-options: -Wall ghc-options:
- -Wall
dependencies: dependencies:
- extra - extra
- text - text
...@@ -54,6 +55,7 @@ library: ...@@ -54,6 +55,7 @@ library:
- -Wunused-imports - -Wunused-imports
- -Werror - -Werror
- -freduction-depth=300 - -freduction-depth=300
- -fplugin=Clippy
exposed-modules: exposed-modules:
- Gargantext - Gargantext
- Gargantext.API - Gargantext.API
...@@ -169,6 +171,7 @@ library: ...@@ -169,6 +171,7 @@ library:
- cassava - cassava
- cereal # (IGraph) - cereal # (IGraph)
- cborg - cborg
- ghc-clippy-plugin
- conduit - conduit
- conduit-extra - conduit-extra
- containers - containers
......
...@@ -32,8 +32,8 @@ import qualified Data.Text as DT ...@@ -32,8 +32,8 @@ import qualified Data.Text as DT
type FileOut = FilePath type FileOut = FilePath
publi2csv :: Int -> FileDir -> FileOut -> IO () book2csv :: Int -> FileDir -> FileOut -> IO ()
publi2csv n f_in f_out = do book2csv n f_in f_out = do
files <- filesOf f_in files <- filesOf f_in
texts <- readPublis f_in files texts <- readPublis f_in files
let publis = List.concat $ map (file2publi n) texts let publis = List.concat $ map (file2publi n) texts
......
...@@ -36,8 +36,9 @@ extra-deps: ...@@ -36,8 +36,9 @@ extra-deps:
- hstatistics-0.3.1 - hstatistics-0.3.1
- HSvm-0.1.1.3.22 - HSvm-0.1.1.3.22
- hsparql-0.3.8 - hsparql-0.3.8
- ghc-clippy-plugin-0.0.0.1
#- git: https://gitlab.iscpif.fr/gargantext/haskell-gargantext-prelude.git #- git: https://gitlab.iscpif.fr/gargantext/haskell-gargantext-prelude.git
# commit: 791c2a7046a3760f8ae5fabdbd708f61caa63741 # commit: 791c2a7046a3760f8ae5fabdbd708f61caa63741
- git: https://gitlab.iscpif.fr/cgenie/haskell-gargantext-prelude - git: https://gitlab.iscpif.fr/cgenie/haskell-gargantext-prelude
commit: 8f97fef4dfd941d773914ad058d8e02ce2bb1a3e # e250af8a495191b4bd06c9f465656b87bea7bf7f commit: 8f97fef4dfd941d773914ad058d8e02ce2bb1a3e # e250af8a495191b4bd06c9f465656b87bea7bf7f
......
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