[FIX] basic pairing ok on lastname

a3e0a249 · Alexandre Delanoë · ac5d621b · a3e0a249
Commit a3e0a249 authored Jul 24, 2020 by Alexandre Delanoë
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

Pairing.hs src/Gargantext/Database/Action/Flow/Pairing.hs +1 -1

No files found.
--- a/src/Gargantext/Database/Action/Flow/Pairing.hs
+++ b/src/Gargantext/Database/Action/Flow/Pairing.hs
@@ -71,7 +71,7 @@ isPairedWith nt nId = runOpaQuery (selectQuery nt nId)
 -----------------------------------------------------------------------
 pairing :: AnnuaireId -> CorpusId -> ListId -> GargNoServer Int
 pairing a c l = do
-  dataPaired <- dataPairing a (c,l,Authors) lastName namePolicy
+  dataPaired <- dataPairing a (c,l,Authors) lastName lastName
  insertDB $ prepareInsert dataPaired