[tests] attempt to add test for facet doc score

src/Gargantext/API/Node/Update.hs

@@ -197,7 +197,7 @@ updateNode _uId _nId _p jobHandle = do
 ------------------------------------------------------------------------
 
 updateDocs :: (FlowCmdM env err m, MonadJobStatus m)
-    => NodeId -> m ()
+            => NodeId -> m ()
 updateDocs cId = do
   lId <- defaultList cId
   _ <- reIndexWith cId lId NgramsTerms (Set.singleton MapTerm)

test/Test/Database/Operations/DocumentSearch.hs

@@ -190,6 +190,7 @@ corpusSearch03 env = do
       map facetDoc_title results3 `shouldBe` ["PyPlasm: computational geometry made easy", "Haskell for OCaml programmers"]
 
 -- | Check that the score doc count is correct
+--   TODO This test is unfinished because `updateDocs` needs more work
 corpusScore01 :: TestEnv -> Assertion
 corpusScore01 env = do
   flip runReaderT env $ runTestMonad $ do
@@ -204,7 +205,7 @@ corpusScore01 env = do
 
       map facetDoc_score results `shouldBe` [Just 0.0, Just 0.0]
 
-    _ <- updateDocs (_node_id corpus)
+    -- _ <- updateDocs (_node_id corpus)
 
     liftIO $ do
       map facetDoc_score results `shouldBe` [Just 0.0, Just 0.0]