diff --git a/tests/Test/Connector.hs b/tests/Test/Connector.hs
index ac70997..32575cf 100644
--- a/tests/Test/Connector.hs
+++ b/tests/Test/Connector.hs
@@ -305,7 +305,7 @@ withPostgresSQL f = bracket setup teardown f
 
   createDatabase user name = do
     (code, _, err) <- readProcessWithExitCode "createdb"
-      [ "--username", user
+      [ "--owner", user
       , "--no-password", name
       ] ""
     case code of