From c36019256d5f860fd0a56249b0e2fe2521b9591e Mon Sep 17 00:00:00 2001
From: Dominic Mayhew <dominic.j.mayhew@gmail.com>
Date: Tue, 18 Jun 2024 18:17:36 -0700
Subject: [PATCH] Convert addresses to lowercase to replicate the `NO CASE`
 collation in SQLite

---
 src/Kupo/App/Database/Postgres.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Kupo/App/Database/Postgres.hs b/src/Kupo/App/Database/Postgres.hs
index 3c2aaa1..2c5d71c 100644
--- a/src/Kupo/App/Database/Postgres.hs
+++ b/src/Kupo/App/Database/Postgres.hs
@@ -267,7 +267,7 @@ mkDatabase tr longestRollback bracketConnection = Database
             mapM_ (\DB.Input{..} -> do
                 insertRow @"inputs" conn 7
                     ( Binary extendedOutputReference
-                    , address
+                    , T.toLower address
                     , Binary value
                     , Binary <$> datumInfo
                     , Binary <$> refScriptHash