diff --git a/changelog.md b/changelog.md
--- a/changelog.md
+++ b/changelog.md
@@ -1,3 +1,6 @@
+0.7.4.2
+* Loosen HUnit dependency for tests.
+
 0.7.4.1
 * Loosen QuickCheck dependency for tests.
 
diff --git a/retry.cabal b/retry.cabal
--- a/retry.cabal
+++ b/retry.cabal
@@ -14,7 +14,7 @@
         case we should hang back for a bit and retry the query instead
         of simply raising an exception.
 
-version:             0.7.4.1
+version:             0.7.4.2
 synopsis:            Retry combinators for monadic actions that may fail
 license:             BSD3
 license-file:        LICENSE
@@ -55,9 +55,13 @@
       , random
       , time
       , QuickCheck         >= 2.7 && < 2.10
-      , HUnit              >= 1.2.5.2 && < 1.4
+      , HUnit              >= 1.2.5.2 && < 1.6
       , hspec              >= 1.9
       , stm
       , ghc-prim
       , mtl
     default-language: Haskell2010
+
+source-repository head
+  type:     git
+  location: git://github.com/Soostone/retry.git
diff --git a/src/Control/Retry.hs b/src/Control/Retry.hs
--- a/src/Control/Retry.hs
+++ b/src/Control/Retry.hs
@@ -201,15 +201,15 @@
 -------------------------------------------------------------------------------
 -- | Apply policy on status to see what the decision would be.
 -- 'Nothing' implies no retry, 'Just' returns updated status.
-applyPolicy 
-    :: Monad m 
-    => RetryPolicyM m 
-    -> RetryStatus 
+applyPolicy
+    :: Monad m
+    => RetryPolicyM m
+    -> RetryStatus
     -> m (Maybe RetryStatus)
 applyPolicy (RetryPolicyM policy) s = do
     res <- policy s
     case res of
-      Just delay -> return $! Just $! RetryStatus 
+      Just delay -> return $! Just $! RetryStatus
           { rsIterNumber = rsIterNumber s + 1
           , rsCumulativeDelay = rsCumulativeDelay s `boundedPlus` delay
           , rsPreviousDelay = Just delay }
@@ -220,9 +220,9 @@
 -- | Apply policy and delay by its amount if it results in a retry.
 -- Return updated status.
 applyAndDelay
-    :: MonadIO m 
-    => RetryPolicyM m 
-    -> RetryStatus 
+    :: MonadIO m
+    => RetryPolicyM m
+    -> RetryStatus
     -> m (Maybe RetryStatus)
 applyAndDelay policy s = do
     chk <- applyPolicy policy s
@@ -234,8 +234,8 @@
         return (Just rs)
       Nothing -> return Nothing
 
-    
 
+
 -------------------------------------------------------------------------------
 -- | Helper for making simplified policies that don't use the monadic
 -- context.
@@ -504,7 +504,7 @@
         | Just e' <- fromException e = do
             chk <- h e'
             case chk of
-              True -> do                
+              True -> do
                 res <- applyPolicy policy s
                 case res of
                   Just rs -> do