diff --git a/Shakefile.hs b/Shakefile.hs
deleted file mode 100644
--- a/Shakefile.hs
+++ /dev/null
@@ -1,45 +0,0 @@
-#!/usr/bin/env stack
-{- stack
-    runghc
-    --package shakers
- -}
-
-{-# LANGUAGE NoImplicitPrelude #-}
-{-# LANGUAGE OverloadedStrings #-}
-
--- | Shake makefile for project.
---
-import Development.Shakers
-
--- | Main entry point.
---
-main :: IO ()
-main = shakeMain $ do
-  let pats =
-        [ "stack*.yaml"
-        , "Shakefile.hs"
-        , "src//*.hs"
-        ]
-      pats' = delete "stack*.yaml" pats
-
-  -- | Haskell rules.
-  --
-  hsRules "." pats'
-
-  -- | Cabal rules.
-  --
-  cabalRules "." "preamble.cabal"
-
-  -- | Stack rules.
-  --
-  stackRules "." pats
-
-  -- | sanity
-  --
-  fake "." pats "sanity" $ const $ do
-    need [ "build-error" ]
-    need [ "docs", "lint", "weed" ]
-
-  -- | Default things to run.
-  --
-  want [ "sanity", "format" ]
diff --git a/preamble.cabal b/preamble.cabal
--- a/preamble.cabal
+++ b/preamble.cabal
@@ -1,5 +1,5 @@
 name:                  preamble
-version:               0.0.59
+version:               0.0.60
 synopsis:              Yet another prelude.
 description:           A prelude built on basic-prelude.
 homepage:              https://github.com/swift-nav/preamble
@@ -49,13 +49,6 @@
                      , transformers-base
                      , unordered-containers
                      , uuid
-
-executable shake-preamble
-  main-is:             Shakefile.hs
-  ghc-options:         -threaded -rtsopts -with-rtsopts=-N -Wall
-  build-depends:       base >= 4.8 && < 5
-                     , shakers
-  default-language:    Haskell2010
 
 source-repository head
   type:                git
diff --git a/src/Preamble/Lens.hs b/src/Preamble/Lens.hs
--- a/src/Preamble/Lens.hs
+++ b/src/Preamble/Lens.hs
@@ -13,9 +13,8 @@
 -- | makeClassy with list of class constraints.
 --
 makeClassyConstraints :: Name -> [Name] -> DecsQ
-makeClassyConstraints name names = do
-  decls <- makeClassy name
-  pure $ addConstraints names decls
+makeClassyConstraints name names =
+ addConstraints names <$> makeClassy name
 
 -- | Add constaints to a class.
 --