Setup: don't use deprecated rewriteFile

1 files changed, 1 insertions, 1 deletions

diff --git a/Setup.hs b/Setup.hs
index 9154f56..dd86bba 100644
--- a/Setup.hs
+++ b/Setup.hs
@@ -46,7 +46,7 @@ writeGetTextConstantsFile pkg lbi flags = do
 
     let pathsModulePath = autogenPackageModulesDir lbi
                       </> ModuleName.toFilePath (getTextConstantsModuleName pkg) <.> "hs"
-    rewriteFile pathsModulePath (generateModule pkg lbi)
+    rewriteFileEx verbosity pathsModulePath (generateModule pkg lbi)
 
 getTextConstantsModuleName :: PackageDescription -> ModuleName
 getTextConstantsModuleName pkg_descr =