From b457de1fc93641ca596671e44bd44953e8f5a5b7 Mon Sep 17 00:00:00 2001
From: Matthew Pickering <matthewtpickering@gmail.com>
Date: Mon, 5 Jun 2023 10:05:41 +0100
Subject: [PATCH] Refresh new simplified_head_hackage_results view
---
import/ImportHeadHackage.hs | 3 +++
1 file changed, 3 insertions(+)
diff --git a/import/ImportHeadHackage.hs b/import/ImportHeadHackage.hs
index 1bca200..268e4af 100644
--- a/import/ImportHeadHackage.hs
+++ b/import/ImportHeadHackage.hs
@@ -49,6 +49,9 @@ importLog conn job_id job_name commit logPath = do
Just m -> do
print ("Importing", pkgName, version, parts, logPath, baseName)
void $ addMeasurements conn (job_id <> "/" <> T.pack baseName) job_name commit m
+ putStrLn "Refresh simplified_head_hackage_results"
+ execute_ conn [sql| REFRESH MATERIALIZED VIEW simplified_head_hackage_results |]
+ return ()
addMeasurements :: Connection
--
GitLab