From 6b27332df29a294167fe4f5b91e2fa0a8f96c665 Mon Sep 17 00:00:00 2001 From: Rutger Broekhoff Date: Sat, 22 Mar 2025 14:53:56 +0100 Subject: Get rid of older current account statement parser --- app/Main.hs | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'app/Main.hs') diff --git a/app/Main.hs b/app/Main.hs index f5140f2..7b4551a 100644 --- a/app/Main.hs +++ b/app/Main.hs @@ -16,7 +16,6 @@ import Brick.Widgets.Core import Brick.Widgets.Dialog qualified as D import Graphics.Vty qualified as V import Import.Ing.CurrentAccountCsv qualified -import Import.Ing.CurrentAccountCsv2 qualified import Import.Ing.SavingsAccountCsv qualified import System.IO (IOMode (ReadMode), withFile) import Text.Pretty.Simple (pPrint) @@ -95,7 +94,7 @@ main = do let filename = "/home/rutgerbrf/Code/P/wayligmative/test3.csv" putStrLn $ "Reading " ++ filename withFile filename ReadMode $ \h -> do - entries <- Import.Ing.CurrentAccountCsv2.readFile h + entries <- Import.Ing.CurrentAccountCsv.readFile h pPrint entries -- d <- M.defaultMain theApp initialState -- cgit v1.2.3