diff --git a/relational-query-HDBC.cabal b/relational-query-HDBC.cabal
--- a/relational-query-HDBC.cabal
+++ b/relational-query-HDBC.cabal
@@ -1,12 +1,12 @@
 name:                relational-query-HDBC
-version:             0.0.1.0
+version:             0.0.1.1
 synopsis:            HDBC instance of relational join and typed query for HDBC
 description:         This package contains HDBC instance of relational-query and
                      typed query for HDBC.
                      Generating Database table definitions and functions for
                      relational-query by reading table and index definitions
                      from Database system catalogs.
-homepage:            http://twitter.com/khibino
+homepage:            http://khibino.github.io/haskell-relational-record/
 license:             BSD3
 license-file:        LICENSE
 author:              Kei Hibino, Shohei Murayama, Shohei Yasutake, Sho KURODA
diff --git a/src/Database/HDBC/Schema/MySQL.hs b/src/Database/HDBC/Schema/MySQL.hs
--- a/src/Database/HDBC/Schema/MySQL.hs
+++ b/src/Database/HDBC/Schema/MySQL.hs
@@ -9,6 +9,7 @@
 
 import           Prelude                            hiding (length)
 import           Language.Haskell.TH                (TypeQ)
+import           Language.Haskell.TH.Lib.Extra      (reportMessage)
 import qualified Data.List                          as List
 import           Data.Map                           (fromList)
 
@@ -38,7 +39,7 @@
 logPrefix = ("MySQL: " ++)
 
 putLog :: String -> IO ()
-putLog = putStrLn . logPrefix
+putLog = reportMessage . logPrefix
 
 compileErrorIO :: String -> IO a
 compileErrorIO = fail . logPrefix
diff --git a/src/Database/HDBC/Schema/Oracle.hs b/src/Database/HDBC/Schema/Oracle.hs
--- a/src/Database/HDBC/Schema/Oracle.hs
+++ b/src/Database/HDBC/Schema/Oracle.hs
@@ -10,6 +10,7 @@
 import Data.Map (fromList)
 import Data.Maybe (catMaybes)
 import Language.Haskell.TH (TypeQ)
+import Language.Haskell.TH.Lib.Extra (reportMessage)
 
 import Database.HDBC (IConnection, SqlValue)
 import Database.HDBC.Record.Query (runQuery')
@@ -34,7 +35,7 @@
 logPrefix = ("Oracle: " ++)
 
 putLog :: String -> IO ()
-putLog = putStrLn . logPrefix
+putLog = reportMessage . logPrefix
 
 compileErrorIO :: String -> IO a
 compileErrorIO = fail . logPrefix
diff --git a/src/Database/HDBC/Schema/SQLServer.hs b/src/Database/HDBC/Schema/SQLServer.hs
--- a/src/Database/HDBC/Schema/SQLServer.hs
+++ b/src/Database/HDBC/Schema/SQLServer.hs
@@ -29,6 +29,7 @@
 import Database.Relational.Schema.SQLServerSyscat.Columns (Columns)
 import Database.Relational.Schema.SQLServerSyscat.Types (Types)
 import Language.Haskell.TH (TypeQ)
+import Language.Haskell.TH.Lib.Extra (reportMessage)
 
 $(makeRecordPersistableWithSqlTypeDefaultFromDefined
   [t| SqlValue |] ''Columns)
@@ -40,7 +41,7 @@
 logPrefix = ("SQLServer: " ++)
 
 putLog :: String -> IO ()
-putLog = putStrLn . logPrefix
+putLog = reportMessage . logPrefix
 
 compileErrorIO :: String -> IO a
 compileErrorIO =  fail . logPrefix
diff --git a/src/Database/HDBC/Schema/SQLite3.hs b/src/Database/HDBC/Schema/SQLite3.hs
--- a/src/Database/HDBC/Schema/SQLite3.hs
+++ b/src/Database/HDBC/Schema/SQLite3.hs
@@ -31,6 +31,7 @@
 import Database.Relational.Schema.SQLite3Syscat.IndexList (IndexList)
 import Database.Relational.Schema.SQLite3Syscat.TableInfo (TableInfo)
 import Language.Haskell.TH (TypeQ)
+import Language.Haskell.TH.Lib.Extra (reportMessage)
 
 $(makeRecordPersistableWithSqlTypeDefaultFromDefined
   [t| SqlValue |] ''TableInfo)
@@ -45,7 +46,7 @@
 logPrefix = ("SQLite3: " ++)
 
 putLog :: String -> IO ()
-putLog = putStrLn . logPrefix
+putLog = reportMessage . logPrefix
 
 compileErrorIO :: String -> IO a
 compileErrorIO =  fail . logPrefix