From e40e290ef216656d304f4f3095dbef223e94191d Mon Sep 17 00:00:00 2001
From: Rutger Broekhoff
Date: Fri, 21 Mar 2025 09:45:22 +0100
Subject: Changes

---
 app/Main.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'app/Main.hs')

diff --git a/app/Main.hs b/app/Main.hs
index 2438203..403b78f 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -16,6 +16,7 @@ import Brick.Widgets.Core
 import Brick.Widgets.Dialog qualified as D
 import Graphics.Vty qualified as V
 import Import.Ing.SavingsAccountCsv qualified
+import Import.Ing.CurrentAccountCsv qualified
 import System.IO (IOMode (ReadMode), withFile)
 import Text.Pretty.Simple (pPrint)
 
@@ -93,7 +94,7 @@ main = do
   let filename = "/home/rutgerbrf/Code/P/wayligmative/test.csv"
   putStrLn $ "Reading " ++ filename
   withFile filename ReadMode $ \h -> do
-    entries <- Import.Ing.SavingsAccountCsv.readFile h
+    entries <- Import.Ing.CurrentAccountCsv.readFile h
     pPrint entries
 
 --  d <- M.defaultMain theApp initialState
-- 
cgit v1.2.3