Commit 4c80c0eb authored by Alexandre Delanoë's avatar Alexandre Delanoë

[FIX] removing warning msg

parent 3eea9cba
...@@ -411,8 +411,9 @@ getNodeStory c nId@(NodeId nodeId) = do ...@@ -411,8 +411,9 @@ getNodeStory c nId@(NodeId nodeId) = do
-- `node_id`, `version` and there is a M2M table -- `node_id`, `version` and there is a M2M table
-- `node_stories_ngrams` without the `version` colum? Then we would -- `node_stories_ngrams` without the `version` colum? Then we would
-- have `version` in only one place. -- have `version` in only one place.
let versionsS = Set.fromList $ map (\a -> a ^. a_version) dbData
{- {-
let versionsS = Set.fromList $ map (\a -> a ^. a_version) dbData
if Set.size versionsS > 1 then if Set.size versionsS > 1 then
panic $ Text.pack $ "[getNodeStory] versions for " <> show nodeId <> " differ! " <> show versionsS panic $ Text.pack $ "[getNodeStory] versions for " <> show nodeId <> " differ! " <> show versionsS
else else
......
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