diff --git a/async-refresh.cabal b/async-refresh.cabal
--- a/async-refresh.cabal
+++ b/async-refresh.cabal
@@ -1,5 +1,5 @@
 name:                async-refresh
-version:             0.1.7
+version:             0.2.0
 synopsis:            Package implementing core logic for refreshing of expiring data.
 description:         This package can be used for refreshing of expiring data according
                      to a user-provided action. Using callbacks, the user can decide
diff --git a/src/Control/Concurrent/Async/Refresh.hs b/src/Control/Concurrent/Async/Refresh.hs
--- a/src/Control/Concurrent/Async/Refresh.hs
+++ b/src/Control/Concurrent/Async/Refresh.hs
@@ -138,7 +138,7 @@
 asyncRefreshThread conf = forever $
   tryAny (asyncRefreshDo conf) >>= \case
     Right res -> do
-      let delay = fromMaybe (conf ^. Lens.defaultInterval) (refreshTryNext res)
+      let delay = fromMaybe (conf ^. Lens.defaultInterval) (refreshExpiry res)
       logDebugN $
         sformat ("Refreshing done for refreshing request '" % stext % "'")
                 (asyncRefreshConfGetLabel conf)
diff --git a/src/Control/Concurrent/Async/Refresh/Lenses.hs b/src/Control/Concurrent/Async/Refresh/Lenses.hs
--- a/src/Control/Concurrent/Async/Refresh/Lenses.hs
+++ b/src/Control/Concurrent/Async/Refresh/Lenses.hs
@@ -4,8 +4,6 @@
 {-# LANGUAGE TemplateHaskell        #-}
 {-# LANGUAGE TypeSynonymInstances   #-}
 
-module Control.Concurrent.Async.Refresh.Lenses where
-
 {-|
 Module      : Control.Concurrent.Async.Refresh.Lenses
 Description : This module defines lenses used within the async-refresh package.
@@ -15,6 +13,8 @@
 Stability   : experimental
 Portability : POSIX
 -}
+
+module Control.Concurrent.Async.Refresh.Lenses where
 
 import           Control.Concurrent.Async.Refresh.Types
 import           Control.Lens
diff --git a/src/Control/Concurrent/Async/Refresh/Types.hs b/src/Control/Concurrent/Async/Refresh/Types.hs
--- a/src/Control/Concurrent/Async/Refresh/Types.hs
+++ b/src/Control/Concurrent/Async/Refresh/Types.hs
@@ -31,6 +31,6 @@
 
 -- | Data type returned by async refresh actions.
 data RefreshResult a =
-  RefreshResult { refreshResult  :: a         -- ^ Actual result.
-                , refreshTryNext :: Maybe Int -- ^ In milliseconds.
+  RefreshResult { refreshResult :: a         -- ^ Actual result.
+                , refreshExpiry :: Maybe Int -- ^ In milliseconds.
                 } deriving (Show)