diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,5 +1,9 @@
 # Revision history for cli-git
 
+## 0.2.0.1
+
+* Build with GHC 9.6
+
 ## 0.2.0.0
 
 * [#2](https://github.com/obsidiansystems/cli-git/pull/2) `ensureCleanGitRepo` and `checkGitCleanStatus` now have `MonadMask` constraints
diff --git a/cli-git.cabal b/cli-git.cabal
--- a/cli-git.cabal
+++ b/cli-git.cabal
@@ -1,6 +1,6 @@
 cabal-version:      >=1.10
 name:               cli-git
-version:            0.2.0.0
+version:            0.2.0.1
 license:            BSD3
 license-file:       LICENSE
 copyright:          Obsidian Systems LLC 2020
@@ -12,22 +12,22 @@
 extra-source-files: CHANGELOG.md
                     README.md
 
-tested-with: GHC ==8.6.5 || ==8.8.4
+tested-with: GHC ==8.6.5 || ==8.8.4 || ==8.10.7 || ==9.0.1 || ==9.2.4
 
 library
   exposed-modules:  Bindings.Cli.Git
   hs-source-dirs:   src
   default-language: Haskell2010
   build-depends:
-      base            >=4.12.0.0 && <4.15
+      base            >=4.12.0.0 && <4.19
     , cli-extras      >=0.2.1.0  && <0.3
     , containers      >=0.6.0.1  && <0.7
     , data-default    >=0.7.1.1  && <0.8
     , exceptions      >=0.10.3   && <0.11
-    , lens            >=4.17.1   && <4.20
-    , logging-effect  >=1.3.4    && <1.4
-    , megaparsec      >=7.0.5    && <9.1
-    , mtl             >=2.2.2    && <2.3
+    , lens            >=4.17.1   && <5.4
+    , logging-effect  >=1.3.4    && <1.5
+    , megaparsec      >=7.0.5    && <9.7
+    , mtl             >=2.2.2    && <2.4
     , text            >=1.2.3.1  && <1.3
     , which           >=0.2      && <0.3
 
diff --git a/src/Bindings/Cli/Git.hs b/src/Bindings/Cli/Git.hs
--- a/src/Bindings/Cli/Git.hs
+++ b/src/Bindings/Cli/Git.hs
@@ -21,12 +21,14 @@
 import Control.Applicative hiding (many)
 import Control.Monad.Catch (MonadMask)
 import Control.Monad.Except
+import Control.Monad.IO.Class (MonadIO)
 import Control.Monad.Fail
 import Control.Monad.Log
 import Data.Bool (bool)
 import Data.Bifunctor
 import Data.Char
 import Data.Either
+import Data.Functor (void)
 import Data.Map (Map)
 import qualified Data.Map as M
 import Data.Maybe (maybeToList)