From 10187d9f442cfd2b1c127f320e99afad10ad0cd1 Mon Sep 17 00:00:00 2001
From: Ramakrishnan Muthukrishnan <ram@leastauthority.com>
Date: Thu, 24 Oct 2019 10:39:58 +0530
Subject: [PATCH] fix incorrect table name

---
 src/PaymentServer/Persistence.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/PaymentServer/Persistence.hs b/src/PaymentServer/Persistence.hs
index 57ec04d..f5cf5fc 100644
--- a/src/PaymentServer/Persistence.hs
+++ b/src/PaymentServer/Persistence.hs
@@ -146,7 +146,7 @@ insertVoucher dbConn voucher =
 
 insertVoucherAndFingerprint :: Sqlite.Connection -> Voucher -> Fingerprint -> IO ()
 insertVoucherAndFingerprint dbConn voucher fingerprint =
-  Sqlite.execute dbConn "INSERT INTO redeemed (voucher_id, fingerprint) VALUES ((SELECT id FROM vouchers_new WHERE name = ?), ?)" (voucher, fingerprint)
+  Sqlite.execute dbConn "INSERT INTO redeemed (voucher_id, fingerprint) VALUES ((SELECT id FROM vouchers WHERE name = ?), ?)" (voucher, fingerprint)
 
 -- | create and open a database with a given `name` and create the `voucher` table
 -- and `redeemed` table with the provided schema
-- 
GitLab