diff --git a/DTC.cabal b/DTC.cabal
--- a/DTC.cabal
+++ b/DTC.cabal
@@ -1,16 +1,22 @@
 Name:           DTC
-Version:        1.0.0
+Version:        1.0.1
 Author:         Daniel Diaz
 Homepage:       http://ddiaz.asofilak.es/packages/DTC
 License:        BSD3
 License-file:   license
 Maintainer:     Daniel Diaz <danieldiaz@asofilak.es>
 Category:       Language
-Synopsis:       Data To Class.
+Synopsis:       Data To Class transformation.
 Description:    Transform data declarations to class definitions.
                 .
                 The way is explained in /Data Declarations to Class Definitions/.
-                You can find these notes in the homepage of the package.
+                You can find more information in the homepage of the package.
+                .
+                Changes from last version:
+                .
+                * Modified some documentation.
+                .
+                * Fixed a non-exhaustive pattern matching error in @dataToClassWith@.
 Build-type:     Simple
 Build-depends:  base == 4.*
               , haskell-src
diff --git a/Language/Haskell/DTC.hs b/Language/Haskell/DTC.hs
--- a/Language/Haskell/DTC.hs
+++ b/Language/Haskell/DTC.hs
@@ -7,6 +7,7 @@
    , module Language.Haskell.DTC.Class
      -- * Re-export "Language.Haskell.Pretty"
    , module Language.Haskell.Pretty
+     -- * Extra functions
      ) where
 
 import Language.Haskell.DTC.Parser
@@ -14,3 +15,4 @@
 import Language.Haskell.DTC.Class
 
 import Language.Haskell.Pretty
+
diff --git a/Language/Haskell/DTC/Class.hs b/Language/Haskell/DTC/Class.hs
--- a/Language/Haskell/DTC/Class.hs
+++ b/Language/Haskell/DTC/Class.hs
@@ -17,8 +17,10 @@
 dataToClassWith str (HsDataDecl loc ctx x_T xs_v xs_C xs_Q)
       = let methods = concatMap (method str xs_v x_T) xs_C
         in  HsClassDecl loc ctx x_T [HsIdent str] methods
+dataToClassWith _ d = d
 
 -- | Transform a data declaration to a class definition.
+-- Equivalent to @dataToClassWith \"t\"@.
 dataToClass :: HsDecl -> HsDecl
 dataToClass = dataToClassWith "t"