diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -1,5 +1,9 @@
 <!-- -*- Markdown -*- -->
 
+## 0.7.2.1
+
+- fix typo.
+
 ## 0.7.2.0
 
 - apply new module names of relational-schema.
diff --git a/relational-query-HDBC.cabal b/relational-query-HDBC.cabal
--- a/relational-query-HDBC.cabal
+++ b/relational-query-HDBC.cabal
@@ -1,5 +1,5 @@
 name:                relational-query-HDBC
-version:             0.7.2.0
+version:             0.7.2.1
 synopsis:            HDBC instance of relational-query and typed query interface for HDBC
 description:         This package contains the HDBC instance of relational-query and
                      the typed query interface for HDBC.
@@ -12,11 +12,17 @@
 license-file:        LICENSE
 author:              Kei Hibino, Shohei Murayama, Shohei Yasutake, Sho KURODA
 maintainer:          ex8k.hibino@gmail.com, shohei.murayama@gmail.com, amutake.s@gmail.com, krdlab@gmail.com
-copyright:           Copyright (c) 2013-2019 Kei Hibino, 2013 Shohei Murayama, 2013 Shohei Yasutake, 2013 Sho KURODA
+copyright:           Copyright (c) 2013-2023 Kei Hibino, 2013 Shohei Murayama, 2013 Shohei Yasutake, 2013 Sho KURODA
 category:            Database
 build-type:          Simple
 cabal-version:       >=1.10
-tested-with:           GHC == 8.6.1, GHC == 8.6.2, GHC == 8.6.3, GHC == 8.6.4, GHC == 8.6.5
+tested-with:           GHC == 9.6.2
+                     , GHC == 9.4.6
+                     , GHC == 9.2.8
+                     , GHC == 9.0.2
+                     , GHC == 8.10.7
+                     , GHC == 8.8.1, GHC == 8.8.2
+                     , GHC == 8.6.1, GHC == 8.6.2, GHC == 8.6.3, GHC == 8.6.4, GHC == 8.6.5
                      , GHC == 8.4.1, GHC == 8.4.2, GHC == 8.4.3, GHC == 8.4.4
                      , GHC == 8.2.1, GHC == 8.2.2
                      , GHC == 8.0.1, GHC == 8.0.2
@@ -72,7 +78,9 @@
   hs-source-dirs:      src
   ghc-options:         -Wall
   if impl(ghc >= 8)
-    ghc-options:         -Wcompat -Wnoncanonical-monadfail-instances
+    ghc-options:         -Wcompat
+  if impl(ghc >= 8) && impl(ghc < 8.8)
+    ghc-options:         -Wnoncanonical-monadfail-instances
 
   default-language:    Haskell2010
 
@@ -88,7 +96,7 @@
   hs-source-dirs:      test
   ghc-options:         -Wall
   if impl(ghc >= 8)
-    ghc-options:         -Wcompat -Wnoncanonical-monadfail-instances
+    ghc-options:         -Wcompat
 
   default-language:    Haskell2010
 
diff --git a/src/Database/HDBC/Query/TH.hs b/src/Database/HDBC/Query/TH.hs
--- a/src/Database/HDBC/Query/TH.hs
+++ b/src/Database/HDBC/Query/TH.hs
@@ -149,7 +149,7 @@
       cols1 = [ (,) cn . maybe ty (liftMaybe ty) . Map.lookup cn $ Map.fromList cmap | (cn, ty) <- cols ]
   defineTableDefault config scm tbl cols1 derives primaryIxs (listToMaybe notNullIdxs)
 
--- | Generate all HDBC templates using system catalog informations with specified config.
+-- | Generate all HDBC templates using system catalog information with specified config.
 defineTableFromDB' :: IConnection conn
                    => IO conn           -- ^ Connect action to system catalog database
                    -> Driver conn       -- ^ Driver definition
@@ -160,7 +160,7 @@
                    -> Q [Dec]           -- ^ Result declaration
 defineTableFromDB' = tableAlongWithSchema
 
--- | Generate all HDBC templates using system catalog informations.
+-- | Generate all HDBC templates using system catalog information.
 defineTableFromDB :: IConnection conn
                   => IO conn     -- ^ Connect action to system catalog database
                   -> Driver conn -- ^ Driver definition