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

[FIX] nlp text cleaning

parent 7c074fc8
......@@ -21,7 +21,7 @@ import Test.Hspec
test :: Spec
test = do
describe "Text that should be cleaned before sending it to NLP tools as micro-services." $ do
let text = "This is a url http://cnrs.gargantext.org to be remove and another one www.gargantext.org and digits 343242-2332 to be remove and some to keep: 232 231 33." :: Text
let result = "This is a url to be remove and another one and digits to be remove and some to keep: 232 231 33."
let text = "This is a url http://cnrs.gargantext.org to be remove and another one www.gargantext.org"
let result = "This is a url to be remove and another one "
it "NLP Clean Text before sending to micro services:" $ cleanTextForNLP text `shouldBe` result
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