From 075d072b7cb43db0821464c13f0ba5c351c4e7dc Mon Sep 17 00:00:00 2001 From: Luke Clifton Date: Wed, 14 Aug 2024 16:20:10 +0800 Subject: [PATCH] Fix actions --- .github/workflows/haskell.yml | 5 +---- src/AppKit.hs | 1 + src/Main.hs | 1 + 3 files changed, 3 insertions(+), 4 deletions(-) diff --git a/.github/workflows/haskell.yml b/.github/workflows/haskell.yml index 8f237e4..2d21439 100644 --- a/.github/workflows/haskell.yml +++ b/.github/workflows/haskell.yml @@ -9,12 +9,9 @@ jobs: steps: - uses: actions/checkout@master - - name: Install GHC - run: | - curl https://gitlab.haskell.org/haskell/ghcup/raw/master/bootstrap-haskell -sSf | sh + - uses: haskell-actions/setup@v2 - name: Build run: | - source ~/.ghcup/env cabal v2-configure --enable-tests cabal v2-build mkdir out diff --git a/src/AppKit.hs b/src/AppKit.hs index 3ed3748..47e66b2 100644 --- a/src/AppKit.hs +++ b/src/AppKit.hs @@ -5,6 +5,7 @@ module AppKit where import Control.Exception (finally, handle, SomeException(..)) import Control.Monad.Cont +import Control.Monad.IO.Class (liftIO) import Data.ByteString (useAsCString) import Data.Text (Text) import qualified Data.Text.Encoding as Text diff --git a/src/Main.hs b/src/Main.hs index bed8df0..2263195 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -10,6 +10,7 @@ import Control.Concurrent import Control.Concurrent.Async import Control.Monad import Control.Monad.Cont +import Control.Monad.IO.Class (liftIO) import Data.Aeson ((.:), ()) import qualified Data.Aeson as JSON import qualified Data.Aeson.Types as JSON