Skip to content

P
purescript-gargantext
Commit 671d7bba authored by Alexandre Delanoë's avatar Alexandre Delanoë
Browse files
Options

Merge remote-tracking branch 'origin/fix-quote-with-space' into dev

parents a71cf585 a774ed7b
Show whitespace changes
Inline Side-by-side
Showing with 1 addition and 1 deletion
src/Gargantext/Core/NgramsTable/Functions.purs
View file @ 671d7bba
...@@ -131,7 +131,7 @@ lookupRootListWithChildren ngram table@(NgramsTable {ngrams_repo_elements: elts} ...@@ -131,7 +131,7 @@ lookupRootListWithChildren ngram table@(NgramsTable {ngrams_repo_elements: elts}
Just (NgramsRepoElement {list}) -> Just list -- assert root == Nothing Just (NgramsRepoElement {list}) -> Just list -- assert root == Nothing
wordBoundaryChars :: String wordBoundaryChars :: String
wordBoundaryChars = """[ .,;:!?’'«»"\\/\|{}()\[\]\_—\+\*=~#@...]""" wordBoundaryChars = """[ .,;:!?’«»"\\/\|{}()\[\]\_—\+\*=~#@...]"""
wordBoundaryReg :: R.Regex wordBoundaryReg :: R.Regex
wordBoundaryReg = case R.regex ("(" <> wordBoundaryChars <> ")") (R.global <> R.multiline) of wordBoundaryReg = case R.regex ("(" <> wordBoundaryChars <> ")") (R.global <> R.multiline) of
......
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