diff --git a/Setup.hs b/Setup.hs
deleted file mode 100644
--- a/Setup.hs
+++ /dev/null
@@ -1,2 +0,0 @@
-import Distribution.Simple
-main = defaultMain
diff --git a/domain-optics.cabal b/domain-optics.cabal
--- a/domain-optics.cabal
+++ b/domain-optics.cabal
@@ -1,7 +1,7 @@
 cabal-version: 3.0
 
 name: domain-optics
-version: 0.1.0.2
+version: 0.1.0.3
 synopsis: Integration of domain with optics
 homepage: https://github.com/nikita-volkov/domain-optics
 bug-reports: https://github.com/nikita-volkov/domain-optics/issues
@@ -28,9 +28,9 @@
     DomainOptics.Util.OpticsTH
   build-depends:
     base >=4.12 && <5,
-    domain-core >=0.1 && <0.2,
+    domain-core >=0.1.0.2 && <0.2,
     optics-core >=0.3.0.1 && <0.5,
-    text >=1 && <2,
+    text >=1.2 && <3,
     template-haskell >=2.14 && <3,
     template-haskell-compat-v0208 >=0.1.5 && <0.2,
     th-lego >=0.2.1 && <0.4,
diff --git a/library/DomainOptics/Util/OpticsTH.hs b/library/DomainOptics/Util/OpticsTH.hs
--- a/library/DomainOptics/Util/OpticsTH.hs
+++ b/library/DomainOptics/Util/OpticsTH.hs
@@ -8,6 +8,7 @@
 import qualified Optics.Core as Optics
 import THLego.Helpers
 import qualified THLego.Lambdas as Lambdas
+import qualified TemplateHaskell.Compat.V0208 as Compat
 
 -- * Optics
 
@@ -36,7 +37,7 @@
         [VarP aName]
         ( CaseE
             (VarE aName)
-            [ Match (ConP conName [VarP bName]) (NormalB (AppE (ConE 'Just) (VarE bName))) [],
+            [ Match (Compat.conp conName [VarP bName]) (NormalB (AppE (ConE 'Just) (VarE bName))) [],
               Match WildP (NormalB (ConE 'Nothing)) []
             ]
         )
@@ -61,7 +62,7 @@
         [VarP aName]
         ( CaseE
             (VarE aName)
-            [ Match (ConP conName []) (NormalB (ConE 'True)) [],
+            [ Match (Compat.conp conName []) (NormalB (ConE 'True)) [],
               Match WildP (NormalB (ConE 'False)) []
             ]
         )