diff --git a/async-refresh-tokens.cabal b/async-refresh-tokens.cabal
--- a/async-refresh-tokens.cabal
+++ b/async-refresh-tokens.cabal
@@ -1,60 +1,71 @@
-name:                async-refresh-tokens
-version:             0.2.0.0
-synopsis:            Package implementing core logic for refreshing of expiring access tokens
-description:         This package can be used for renewal of expiring access tokens
-                     according to user-provided actions. Tokens will be stored in a
-                     transactional variable (TVar).
-homepage:            https://github.com/mtesseract/async-refresh-tokens#readme
-license:             BSD3
-license-file:        LICENSE
-author:              Moritz Schulte
-maintainer:          mtesseract@silverratio.net
-copyright:           (c) 2017 Moritz Schulte
-category:            Control
-build-type:          Simple
-extra-source-files:  README.md
-cabal-version:       >=1.10
+-- This file has been generated from package.yaml by hpack version 0.17.0.
+--
+-- see: https://github.com/sol/hpack
 
-library
-  hs-source-dirs:      src
-  exposed-modules:     Control.Concurrent.Async.Refresh.Tokens
-  other-modules:       Control.Concurrent.Async.Refresh.Tokens.Types
-                     , Control.Concurrent.Async.Refresh.Tokens.Lenses
-                     , Control.Concurrent.Async.Refresh.Tokens.Prelude
-                     , Control.Concurrent.Async.Refresh.Tokens.Conf
-  build-depends:       base >= 4.7 && < 5
-                     , async-refresh >= 0.2.0.2
-                     , monad-logger
-                     , lifted-async
-                     , stm
-                     , microlens >= 0.4
-                     , microlens-th >= 0.4
-                     , text
-                     , monad-control
-                     , safe-exceptions
-                     , bytestring
-                     , formatting
-  default-language:    Haskell2010
-  default-extensions:  NoImplicitPrelude
-                     , OverloadedStrings
-  ghc-options:         -Wall
+name:           async-refresh-tokens
+version:        0.3.0.0
+synopsis:       Package implementing core logic for refreshing of expiring access tokens
+description:    This package can be used for renewal of expiring access tokens according to user-provided actions. Tokens will be stored in a transactional variable (TVar).
+category:       Control
+homepage:       https://github.com/mtesseract/async-refresh-tokens#readme
+bug-reports:    https://github.com/mtesseract/async-refresh-tokens/issues
+author:         Moritz Schulte
+maintainer:     mtesseract@silverratio.net
+copyright:      (c) 2017 Moritz Schulte
+license:        BSD3
+license-file:   LICENSE
+build-type:     Simple
+cabal-version:  >= 1.10
 
-test-suite async-refresh-tokens-test
-  type:                exitcode-stdio-1.0
-  hs-source-dirs:      test
-  main-is:             Spec.hs
-  build-depends:       base
-                     , async-refresh-tokens
-                     , HUnit
-                     , test-framework
-                     , test-framework-hunit
-                     , criterion
-                     , monad-logger
-                     , stm
-  ghc-options:         -threaded -rtsopts -with-rtsopts=-N -Wall -fno-warn-type-defaults
-  default-language:    Haskell2010
-  default-extensions:  OverloadedStrings
+extra-source-files:
+    README.md
 
 source-repository head
-  type:     git
+  type: git
   location: https://github.com/mtesseract/async-refresh-tokens
+
+library
+  hs-source-dirs:
+      src
+  default-extensions: OverloadedStrings NoImplicitPrelude
+  ghc-options: -Wall
+  build-depends:
+      monad-logger
+    , stm
+    , base >=4.7 && <5
+    , async-refresh >=0.2.0.2
+    , lifted-async
+    , microlens >=0.4
+    , microlens-th >=0.4
+    , text
+    , monad-control
+    , safe-exceptions
+    , bytestring
+    , formatting
+  exposed-modules:
+      Control.Concurrent.Async.Refresh.Tokens
+  other-modules:
+      Control.Concurrent.Async.Refresh.Tokens.Conf
+      Control.Concurrent.Async.Refresh.Tokens.Lenses
+      Control.Concurrent.Async.Refresh.Tokens.Prelude
+      Control.Concurrent.Async.Refresh.Tokens.Types
+      Paths_async_refresh_tokens
+  default-language: Haskell2010
+
+test-suite async-refresh-tokens-test
+  type: exitcode-stdio-1.0
+  main-is: Spec.hs
+  hs-source-dirs:
+      test
+  default-extensions: OverloadedStrings
+  ghc-options: -threaded -rtsopts -with-rtsopts=-N -Wall -fno-warn-type-defaults
+  build-depends:
+      monad-logger
+    , stm
+    , base
+    , async-refresh-tokens
+    , HUnit
+    , test-framework
+    , test-framework-hunit
+    , criterion
+  default-language: Haskell2010
diff --git a/src/Control/Concurrent/Async/Refresh/Tokens.hs b/src/Control/Concurrent/Async/Refresh/Tokens.hs
--- a/src/Control/Concurrent/Async/Refresh/Tokens.hs
+++ b/src/Control/Concurrent/Async/Refresh/Tokens.hs
@@ -39,7 +39,8 @@
 
 import           Control.Concurrent.Async.Refresh.Tokens.Prelude
 
-import           Control.Concurrent.Async.Lifted.Safe            (cancel, waitAny)
+import           Control.Concurrent.Async.Lifted.Safe            (cancel,
+                                                                  waitAny)
 import           Control.Concurrent.Async.Refresh
 import           Control.Concurrent.Async.Refresh.Tokens.Conf
 import qualified Control.Concurrent.Async.Refresh.Tokens.Lenses  as Lens
@@ -98,6 +99,6 @@
 
 -- | Create a new empty token store for the provided token type.
 newEmptyTokenStore :: (MonadIO m, IsToken t)
-                   => proxy t -> m (TVar (Either SomeException (Token t)))
-newEmptyTokenStore _ = atomically $
+                   => m (TVar (Either SomeException (Token t)))
+newEmptyTokenStore = atomically $
   newTVar (Left (toException (TokenNotFound "")))
diff --git a/test/Spec.hs b/test/Spec.hs
--- a/test/Spec.hs
+++ b/test/Spec.hs
@@ -21,7 +21,7 @@
 
 createTokenStoreFoo :: LoggingT IO (TokenStore TokenFoo)
 createTokenStoreFoo = do
-  tokenFoo <- newEmptyTokenStore (Proxy :: Proxy TokenFoo)
+  tokenFoo <- newEmptyTokenStore
   let conf = defaultTokenConf
              & tokenConfAddRequest (RequestToken tokenFoo actionFoo)
   _ <- newTokenRefresher conf