From 8828075fa3a25f37ec79507c0cf5179b76f35948 Mon Sep 17 00:00:00 2001 From: Akshay Nair Date: Fri, 12 Jun 2026 00:40:39 +0530 Subject: Add init path substitution --- lib/Daffm.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lib/Daffm.hs') diff --git a/lib/Daffm.hs b/lib/Daffm.hs index a4ced9f..a9b1cd5 100644 --- a/lib/Daffm.hs +++ b/lib/Daffm.hs @@ -19,6 +19,6 @@ app = } initApp :: FilePathText -> Configuration -> IO () -initApp dir config = do - initialState <- loadDirToState dir $ mkEmptyAppState config +initApp initPath config = do + initialState <- loadDirToState initPath $ mkEmptyAppState config initPath void $ B.defaultMain app initialState -- cgit v1.3.1