diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -10,7 +10,7 @@
 
     import Data.Aeson (ToJSON)
     import Data.Proxy (Proxy(..))
-    import Data.Docs (markdown, Docs(..), Sample(..), genDocs)
+    import Data.Docs (markdown, Docs(..), Sample(..), genDocs, genDocsEnum)
     import Data.Text (Text)
     import qualified Data.Text as Text
     import GHC.Generics (Generic)
@@ -41,10 +41,10 @@
     data Hobby = Haskell | Friends | Movies
         deriving (Show, Eq, Generic, Enum, Bounded)
     instance ToJSON Hobby
-    instance Docs Hobby
+    instance Docs Hobby where
+        docs = genDocsEnum "Hobby"
     instance Sample Hobby where
         sample _ = Haskell
-        allValues _ = [minBound..]
 
     doc :: IO ()
     doc = do
diff --git a/gendocs.cabal b/gendocs.cabal
--- a/gendocs.cabal
+++ b/gendocs.cabal
@@ -1,5 +1,5 @@
 name:                gendocs
-version:             0.1.1
+version:             0.1.2
 synopsis:            Library for generating interface documentation from types
 description:         Please see README.md
 homepage:            https://github.com/seanhess/gendocs#readme
diff --git a/src/Data/Docs.hs b/src/Data/Docs.hs
--- a/src/Data/Docs.hs
+++ b/src/Data/Docs.hs
@@ -3,7 +3,7 @@
   , Field(..)
   , Docs(..)
   , genDocs
-  , genDocsWithValues
+  , genDocsEnum
   , genValues
   , genFields
   , Sample(..)
diff --git a/src/Data/Docs/Docs.hs b/src/Data/Docs/Docs.hs
--- a/src/Data/Docs/Docs.hs
+++ b/src/Data/Docs/Docs.hs
@@ -9,7 +9,7 @@
   , Field(..)
   , Docs(..)
   , genDocs
-  , genDocsWithValues
+  , genDocsEnum
   , genValues
   , genFields
   ) where
@@ -58,8 +58,8 @@
     , enumeratedValues = []
     }
 
-genDocsWithValues :: forall a. (Generic a, GTypeName (Rep a), Selectors (Rep a), Bounded a, Enum a, Show a) => Text -> Proxy a -> Documentation
-genDocsWithValues d p =
+genDocsEnum :: forall a. (Generic a, GTypeName (Rep a), Selectors (Rep a), Bounded a, Enum a, Show a) => Text -> Proxy a -> Documentation
+genDocsEnum d p =
     (genDocs d p)
       { enumeratedValues = genValues p }
 
diff --git a/src/Data/Docs/Sample.hs b/src/Data/Docs/Sample.hs
--- a/src/Data/Docs/Sample.hs
+++ b/src/Data/Docs/Sample.hs
@@ -9,7 +9,3 @@
 
     samples :: Proxy a -> [a]
     samples p = [sample p]
-
-    -- | If the values are bounded (an enum), list all of them
-    allValues :: Proxy a -> [a]
-    allValues _ = []