Merge branch 'dev-charts-update-economy' into dev
[gargantext.git] / src / Gargantext / Database / Admin / Trigger / Init.hs
index 10dccc6d413532d98cf154684ebc77e8ef074936..cc0e1a16a8278f85f5c20692e57d366cdaf22358 100644 (file)
@@ -16,17 +16,22 @@ Ngrams by node enable contextual metrics.
 module Gargantext.Database.Admin.Trigger.Init
   where
 
+import Data.Text (Text)
 import Gargantext.Database.Admin.Trigger.NodeNodeNgrams (triggerCountInsert, triggerCountInsert2)
-import Gargantext.Database.Admin.Trigger.Nodes (triggerSearchUpdate)
+import Gargantext.Database.Admin.Trigger.Nodes (triggerSearchUpdate, triggerUpdateHash)
 import Gargantext.Database.Admin.Trigger.NodesNodes (triggerDeleteCount, triggerInsertCount, triggerUpdateAdd, triggerUpdateDel, MasterListId) -- , triggerCoocInsert)
 import Gargantext.Database.Prelude (Cmd)
 import Gargantext.Prelude
 
 ------------------------------------------------------------------------
-
-initTriggers :: MasterListId -> Cmd err [Int64]
-initTriggers lId = do
-  t0 <- triggerSearchUpdate
+initFirstTriggers :: Text -> Cmd err [Int64]
+initFirstTriggers secret = do
+  t0  <- triggerUpdateHash secret
+  pure [t0]
+
+initLastTriggers :: MasterListId -> Cmd err [Int64]
+initLastTriggers lId = do
+  t0  <- triggerSearchUpdate
   t1 <- triggerCountInsert
   t1' <- triggerCountInsert2
   -- t1'' <- triggerCoocInsert lId