diff --git a/changelog b/changelog
--- a/changelog
+++ b/changelog
@@ -1,3 +1,5 @@
+# 0.7.2
+* Replace data-default-class with data-default, Michael Xavier (@MichaelXavier)
 # 0.7.1
 * expose fork job, Jappie Klooster (@jappeace)
 # 0.7.0
diff --git a/cron.cabal b/cron.cabal
--- a/cron.cabal
+++ b/cron.cabal
@@ -1,5 +1,5 @@
 Name:                cron
-Version:             0.7.1
+Version:             0.7.2
 Description:
   Cron data structure and Attoparsec parser. The idea is to embed it in larger
   systems which want to roll their own scheduled tasks in a format that people
@@ -64,7 +64,7 @@
                    , mtl             >= 2.0.1
                    , mtl-compat      >= 0.2.1
                    , semigroups
-                   , data-default-class >= 0.0.1
+                   , data-default
   if flag(lib-Werror)
     ghc-options: -Werror
 
diff --git a/src/System/Cron/Internal/Check.hs b/src/System/Cron/Internal/Check.hs
--- a/src/System/Cron/Internal/Check.hs
+++ b/src/System/Cron/Internal/Check.hs
@@ -12,7 +12,7 @@
 import           Data.Time                   (Day, DiffTime, UTCTime (..),
                                               addUTCTime, fromGregorianValid,
                                               toGregorian)
-import           Data.Time.Calendar.WeekDate
+import           Data.Time.Calendar.WeekDate (toWeekDate)
 import qualified Data.Traversable            as FT
 -------------------------------------------------------------------------------
 import           System.Cron.Types           as CT
diff --git a/src/System/Cron/Internal/Describe/Options.hs b/src/System/Cron/Internal/Describe/Options.hs
--- a/src/System/Cron/Internal/Describe/Options.hs
+++ b/src/System/Cron/Internal/Describe/Options.hs
@@ -12,7 +12,7 @@
 module System.Cron.Internal.Describe.Options where
 
 -------------------------------------------------------------------------------
-import Data.Default.Class
+import Data.Default
 import Data.Semigroup as Semigroup
 -------------------------------------------------------------------------------
 import System.Cron.Internal.Describe.Types
diff --git a/test/System/Test/Cron.hs b/test/System/Test/Cron.hs
--- a/test/System/Test/Cron.hs
+++ b/test/System/Test/Cron.hs
@@ -102,8 +102,8 @@
                       (UTCTime (fromGregorian 2014 11 1) 600) @?= True
     -- https://github.com/MichaelXavier/cron/issues/18
     , testCase "correctly schedules steps and ranges" $ do
-      let Right oddMinute = parseOnly cronSchedule "1-59/2 * * * *"
-      let Right evenMinute = parseOnly cronSchedule "0-59/2 * * * *"
+      let oddMinute = either error id $ parseOnly cronSchedule "1-59/2 * * * *"
+      let evenMinute = either error id $ parseOnly cronSchedule "0-59/2 * * * *"
       let t1 = mkTime 2015 7 17 15 17 0
       let t2 = mkTime 2015 7 17 15 18 0
       scheduleMatches oddMinute t1 @?= True
diff --git a/test/System/Test/Cron/Describe.hs b/test/System/Test/Cron/Describe.hs
--- a/test/System/Test/Cron/Describe.hs
+++ b/test/System/Test/Cron/Describe.hs
@@ -126,7 +126,7 @@
     ]
   ]
   where
-    mkCronSchedule t = let (Right cs) = parseCronSchedule t in cs
+    mkCronSchedule t = let cs = either error id $ parseCronSchedule t in cs
     describeNV = describe (twentyFourHourFormat <> notVerbose) . mkCronSchedule
     describeV  = describe (twentyFourHourFormat <> verbose) . mkCronSchedule
     describe12 = describe verbose . mkCronSchedule
diff --git a/test/System/Test/Cron/Schedule.hs b/test/System/Test/Cron/Schedule.hs
--- a/test/System/Test/Cron/Schedule.hs
+++ b/test/System/Test/Cron/Schedule.hs
@@ -32,9 +32,10 @@
   , testCase "should read all three jobs." $
       length s @?= 3
   ]
-  where Right ((), s) = runSchedule $ do addJob noop "* * * * *"
-                                         addJob noop "0 * * * *"
-                                         addJob noop "0 0 * * *"
+  where ((), s) = either (error . show) id $ runSchedule $ do
+                    addJob noop "* * * * *"
+                    addJob noop "0 * * * *"
+                    addJob noop "0 0 * * *"
         noop = return ()
 
 describeExecSchedule :: TestTree
