Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
haskell-gargantext
Project
Project
Details
Activity
Releases
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
Julien Moutinho
haskell-gargantext
Commits
3eea9cba
Commit
3eea9cba
authored
Dec 19, 2022
by
Alexandre Delanoë
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
[FIX] removing panic with NodeStory version
parent
d18e6db2
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
3 additions
and
1 deletion
+3
-1
CHANGELOG.md
CHANGELOG.md
+1
-1
NodeStory.hs
src/Gargantext/Core/NodeStory.hs
+2
-0
No files found.
CHANGELOG.md
View file @
3eea9cba
## Version 0.0.6.8.5.9
*
[
ALL
][
FEAT
]
Text Flow with NoList built as option
*
[
FRONT
][
FIX
][
Adding 3th ngrams in document view breaks ngrams Table (#476)
](
https://gitlab.iscpif.fr/gargantext/purescript-gargantext/issues/476
)
## Version 0.0.6.8.5.8
*
[
FRONT
][
FIX
][
Graph Explorer Nodes (#471)
](
https://gitlab.iscpif.fr/gargantext/purescript-gargantext/issues/471
)
*
[
FRONT
][
FIX
][
Adding 3th ngrams in document view breaks ngrams Table (#476)
](
https://gitlab.iscpif.fr/gargantext/purescript-gargantext/issues/476
)
*
[
FRONT
][
FIX
][
[docs
]
Backend improvements (#443)](https://gitlab.iscpif.fr/gargantext/purescript-gargantext/issues/443)
## Version 0.0.6.8.5.7
...
...
src/Gargantext/Core/NodeStory.hs
View file @
3eea9cba
...
...
@@ -412,10 +412,12 @@ getNodeStory c nId@(NodeId nodeId) = do
-- `node_stories_ngrams` without the `version` colum? Then we would
-- have `version` in only one place.
let
versionsS
=
Set
.
fromList
$
map
(
\
a
->
a
^.
a_version
)
dbData
{-
if Set.size versionsS > 1 then
panic $ Text.pack $ "[getNodeStory] versions for " <> show nodeId <> " differ! " <> show versionsS
else
pure ()
-}
pure
$
NodeStory
$
Map
.
singleton
nId
$
foldl
combine
mempty
dbData
where
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment