aboutsummaryrefslogtreecommitdiff
path: root/src/Chelleport.hs
diff options
context:
space:
mode:
authorAkshay Nair <phenax5@gmail.com>2024-12-22 18:53:27 +0530
committerAkshay Nair <phenax5@gmail.com>2024-12-22 19:39:39 +0530
commit7cd1f9c93a0bb80171541ce5f0c953ca0f645139 (patch)
treedfbdab3ebe4d2580cc404e5d2a3a67768bd7b289 /src/Chelleport.hs
parentac056ba43192bd3c2cbe90d8c8c3d903985a52dd (diff)
downloadchelleport-7cd1f9c93a0bb80171541ce5f0c953ca0f645139.tar.gz
chelleport-7cd1f9c93a0bb80171541ce5f0c953ca0f645139.zip
Add command to build appimage
Diffstat (limited to 'src/Chelleport.hs')
-rw-r--r--src/Chelleport.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Chelleport.hs b/src/Chelleport.hs
index fe58259..fa21c28 100644
--- a/src/Chelleport.hs
+++ b/src/Chelleport.hs
@@ -35,7 +35,7 @@ run = do
Chelleport.View.render
where
runAppWithCtx :: (MonadIO m) => DrawContext -> AppM m x -> m x
- runAppWithCtx ctx action = runReaderT (runAppM action) ctx
+ runAppWithCtx ctx = (`runReaderT` ctx) . runAppM
initialState :: (Monad m) => m State
initialState = do