Get rid of older current account statement parser

1 files changed, 1 insertions, 2 deletions

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