diff --git a/hindent.cabal b/hindent.cabal
--- a/hindent.cabal
+++ b/hindent.cabal
@@ -1,5 +1,5 @@
 name:                hindent
-version:             4.2.3
+version:             4.2.4
 synopsis:            Extensible Haskell pretty printer
 description:         Extensible Haskell pretty printer. Both a library and an executable.
                      .
@@ -40,7 +40,7 @@
   build-depends:     base >= 4 && < 5
                    , hindent
                    , text
-                   , descriptive == 0.2.*
+                   , descriptive == 0.3.*
                    , haskell-src-exts
 
 executable hindent-generate-tests
diff --git a/src/main/Main.hs b/src/main/Main.hs
--- a/src/main/Main.hs
+++ b/src/main/Main.hs
@@ -52,12 +52,12 @@
           stop (flag "version" "Print the version" Version)
         style =
           makeStyle <$>
-          (constant "--style" "Style to print with" *>
+          (constant "--style" "Style to print with" () *>
            foldr1 (<|>)
                   (map (\s ->
-                          fmap (const s)
-                               (constant (styleName s)
-                                         (styleDescription s)))
+                          constant (styleName s)
+                                   (styleDescription s)
+                                   s)
                        styles)) <*>
           lineLen
         exts =