diff --git a/rfc.cabal b/rfc.cabal
--- a/rfc.cabal
+++ b/rfc.cabal
@@ -1,5 +1,5 @@
 name:                rfc
-version:             0.0.0.7
+version:             0.0.0.8
 synopsis:            Robert Fischer's Common library
 description:         An enhanced Prelude and various utilities for Aeson, Servant, PSQL, and Redis that Robert Fischer uses.
 homepage:            https://github.com/RobertFischer/rfc#README.md
@@ -27,6 +27,7 @@
   hs-source-dirs:      src
   build-depends:       base >= 4.7 && < 5
   default-language:    Haskell2010
+  default-extensions:  NoImplicitPrelude
   ghc-options:         -Wall -fno-warn-orphans -fno-warn-name-shadowing
   if flag(Development)
     ghc-options:       -Werror
diff --git a/src/RFC/Data/UUID.hs b/src/RFC/Data/UUID.hs
--- a/src/RFC/Data/UUID.hs
+++ b/src/RFC/Data/UUID.hs
@@ -7,14 +7,17 @@
   ( module Data.UUID.Types
   ) where
 
+import           ClassyPrelude
+import           RFC.String
+
 import           Data.UUID.Types
 import qualified Data.UUID.Types                    as UUID
+
 #ifndef GHCJS_BROWSER
 import           Database.PostgreSQL.Simple.FromRow
 import           Database.PostgreSQL.Simple.ToRow
 import           Database.PostgreSQL.Simple.Types   (Only (..))
 #endif
-import           RFC.String
 
 #ifndef GHCJS_BROWSER
 instance FromRow UUID where
diff --git a/src/RFC/JSON.hs b/src/RFC/JSON.hs
--- a/src/RFC/JSON.hs
+++ b/src/RFC/JSON.hs
@@ -1,6 +1,7 @@
 {-# LANGUAGE DeriveGeneric     #-}
 {-# LANGUAGE NoImplicitPrelude #-}
 
+
 module RFC.JSON
 ( jsonOptions
 , deriveJSON
@@ -15,12 +16,15 @@
 , Value(..)
 , encode
 , decode
+, module Data.Aeson.Types
 ) where
 
+import           ClassyPrelude
 import           Data.Aeson       as JSON
 import           Data.Aeson.TH    (deriveJSON)
 import           Data.Aeson.Types (Options (..), SumEncoding (..))
-import           RFC.Prelude
+import           Data.Char
+import           RFC.String
 
 jsonOptions :: Options
 jsonOptions = defaultOptions
@@ -32,7 +36,7 @@
   where
     ctm []     = []
     ctm (c:cs) = (charToLower c):cs
-    flm = flm' . span charIsLower
+    flm = flm' . span isLower
     flm' (cs, []) = cs
     flm' (_, cs)  = lowerFirst cs
     lowerFirst []     = []