diff --git a/hasql-optparse-applicative.cabal b/hasql-optparse-applicative.cabal
--- a/hasql-optparse-applicative.cabal
+++ b/hasql-optparse-applicative.cabal
@@ -1,11 +1,13 @@
 cabal-version: 3.0
 name:          hasql-optparse-applicative
-version:       0.7.1.2
+version:       0.7.1.3
 synopsis:      "optparse-applicative" parsers for "hasql"
 category:      Hasql, Database, PostgreSQL, Options
-homepage:      https://github.com/sannsyn/hasql-optparse-applicative 
+homepage:
+  https://github.com/nikita-volkov/hasql-optparse-applicative 
+
 bug-reports:
-  https://github.com/sannsyn/hasql-optparse-applicative/issues 
+  https://github.com/nikita-volkov/hasql-optparse-applicative/issues 
 
 author:        Nikita Volkov <nikita.y.volkov@mail.ru>
 maintainer:    Nikita Volkov <nikita.y.volkov@mail.ru>
@@ -15,7 +17,8 @@
 
 source-repository head
   type:     git
-  location: git://github.com/sannsyn/hasql-optparse-applicative.git
+  location:
+    git://github.com/nikita-volkov/hasql-optparse-applicative.git
 
 library
   hs-source-dirs:     library
diff --git a/library/Hasql/OptparseApplicative.hs b/library/Hasql/OptparseApplicative.hs
--- a/library/Hasql/OptparseApplicative.hs
+++ b/library/Hasql/OptparseApplicative.hs
@@ -26,33 +26,37 @@
     <*> connectionSettings updatedName
   where
     size =
-      option auto . mconcat $
-        [ long (updatedName "pool-size"),
-          value 1,
-          showDefault,
-          help "Amount of connections in the pool"
-        ]
+      option auto
+        . mconcat
+        $ [ long (updatedName "pool-size"),
+            value 1,
+            showDefault,
+            help "Amount of connections in the pool"
+          ]
     acquisitionTimeout =
-      attoparsedOption C.diffTime . mconcat $
-        [ long (updatedName "pool-acquisition-timeout"),
-          value 10,
-          showDefault,
-          help "How long it takes until the attempt to connect is considered timed out"
-        ]
+      attoparsedOption C.diffTime
+        . mconcat
+        $ [ long (updatedName "pool-acquisition-timeout"),
+            value 10,
+            showDefault,
+            help "How long it takes until the attempt to connect is considered timed out"
+          ]
     connectionLifetime =
-      attoparsedOption C.diffTime . mconcat $
-        [ long (updatedName "pool-connection-lifetime"),
-          value (fromIntegral (24 * 60 * 60)),
-          showDefault,
-          help "Maximal lifetime for connections. Allows to periodically clean up the connection resources to avoid server-side leaks"
-        ]
+      attoparsedOption C.diffTime
+        . mconcat
+        $ [ long (updatedName "pool-connection-lifetime"),
+            value (fromIntegral (24 * 60 * 60)),
+            showDefault,
+            help "Maximal lifetime for connections. Allows to periodically clean up the connection resources to avoid server-side leaks"
+          ]
     connectionIdleTime =
-      attoparsedOption C.diffTime . mconcat $
-        [ long (updatedName "pool-connection-idle-time"),
-          value (fromIntegral (5 * 60)),
-          showDefault,
-          help "Maximal connection idle time"
-        ]
+      attoparsedOption C.diffTime
+        . mconcat
+        $ [ long (updatedName "pool-connection-idle-time"),
+            value (fromIntegral (5 * 60)),
+            showDefault,
+            help "Maximal connection idle time"
+          ]
 
 -- | Given a function, which updates the long names produces a parser
 -- of @Hasql.Connection.'A.Settings'@.
@@ -64,37 +68,37 @@
   A.settings <$> host <*> port <*> user <*> password <*> database
   where
     host =
-      fmap fromString $
-        strOption $
-          long (updatedName "host")
-            <> value "127.0.0.1"
-            <> showDefault
-            <> help "Server host"
+      fmap fromString
+        $ strOption
+        $ long (updatedName "host")
+        <> value "127.0.0.1"
+        <> showDefault
+        <> help "Server host"
     port =
-      option auto $
-        long (updatedName "port")
-          <> value 5432
-          <> showDefault
-          <> help "Server port"
+      option auto
+        $ long (updatedName "port")
+        <> value 5432
+        <> showDefault
+        <> help "Server port"
     user =
-      fmap fromString $
-        strOption $
-          long (updatedName "user")
-            <> value "postgres"
-            <> showDefault
-            <> help "Username"
+      fmap fromString
+        $ strOption
+        $ long (updatedName "user")
+        <> value "postgres"
+        <> showDefault
+        <> help "Username"
     password =
-      fmap fromString $
-        strOption $
-          long (updatedName "password")
-            <> value ""
-            <> showDefault
-            <> help "Password"
+      fmap fromString
+        $ strOption
+        $ long (updatedName "password")
+        <> value ""
+        <> showDefault
+        <> help "Password"
     database =
-      fmap fromString $
-        strOption $
-          long (updatedName "database")
-            <> help "Database name"
+      fmap fromString
+        $ strOption
+        $ long (updatedName "database")
+        <> help "Database name"
 
 -- * Helpers