diff --git a/adblock2privoxy.cabal b/adblock2privoxy.cabal
--- a/adblock2privoxy.cabal
+++ b/adblock2privoxy.cabal
@@ -1,9 +1,9 @@
 name:           adblock2privoxy
-version:        2.1.0
+version:        2.1.1
 cabal-version:  >= 1.10
 build-type:     Simple
 tested-with:
-                GHC==8.10.7
+                GHC==9.6.3
 author:         Alexey Zubritsky <adblock2privoxy@zubr.me>, Steven Thomas Smith <steve.t.smith@gmail.com>
 data-files:
                 templates/ab2p.system.action,
@@ -64,7 +64,7 @@
                 GeneralizedNewtypeDeriving,
                 FlexibleContexts
   build-depends:
-                base >= 4 && < 5,
+                base >= 4 && < 9.9,
                 parsec,
                 mtl,
                 containers,
@@ -103,4 +103,4 @@
   type:         git
   location:     https://github.com/essandess/adblock2privoxy.git
   subdir:       adblock2privoxy
-  tag:          v2.1.0
+  tag:          v2.1.1
diff --git a/changelog b/changelog
--- a/changelog
+++ b/changelog
@@ -1,3 +1,6 @@
+2.1.1
+	* Fix compilation issues for ghc 9.6.3
+
 2.1.0
 	* Use TLS for CSS server to avoid mixed content errors
 	* Add --useHTTP option
diff --git a/src/ParsecExt.hs b/src/ParsecExt.hs
--- a/src/ParsecExt.hs
+++ b/src/ParsecExt.hs
@@ -11,7 +11,7 @@
 import Utils
 import Control.Applicative hiding (many)
 import Text.ParserCombinators.Parsec hiding ((<|>),State)
-import Control.Monad.Trans
+import Control.Monad
 import Control.Monad.RWS
 import Control.Monad.State
 import Data.Maybe
diff --git a/src/PatternConverter.hs b/src/PatternConverter.hs
--- a/src/PatternConverter.hs
+++ b/src/PatternConverter.hs
@@ -5,6 +5,7 @@
 import InputParser
 import Control.Applicative hiding (many)
 import Text.ParserCombinators.Parsec hiding (Line, (<|>))
+import Control.Monad
 import Control.Monad.State
 import Data.List
 import Data.Maybe
diff --git a/src/Statistics.hs b/src/Statistics.hs
--- a/src/Statistics.hs
+++ b/src/Statistics.hs
@@ -5,6 +5,7 @@
 import InputParser
 import Data.Maybe
 import Control.Applicative
+import Control.Monad
 import Control.Monad.State
 
 type Stat = Map.Map String Int
diff --git a/src/Utils.hs b/src/Utils.hs
--- a/src/Utils.hs
+++ b/src/Utils.hs
@@ -24,8 +24,8 @@
 (.*.)
 ) where
 import Control.Applicative hiding (many)
-import Control.Monad.Writer
 import Control.Monad.State
+import Data.Monoid
 
 ------------------------------------------------------------------------------------------
 ----------------------------- export -----------------------------------------------------
