diff --git a/gore-and-ash-async.cabal b/gore-and-ash-async.cabal
--- a/gore-and-ash-async.cabal
+++ b/gore-and-ash-async.cabal
@@ -1,5 +1,5 @@
 name:                gore-and-ash-async
-version:             1.0.0.0
+version:             1.0.1.0
 synopsis:            Core module for Gore&Ash engine that embeds async IO actions into game loop.
 description:         Please see README.md
 homepage:            https://github.com/TeaspotStudio/gore-and-ash-async#readme
diff --git a/src/Game/GoreAndAsh/Async/Module.hs b/src/Game/GoreAndAsh/Async/Module.hs
--- a/src/Game/GoreAndAsh/Async/Module.hs
+++ b/src/Game/GoreAndAsh/Async/Module.hs
@@ -16,6 +16,7 @@
 import Control.Monad.Catch
 import Control.Monad.Fix 
 import Control.Monad.State.Strict
+import Data.Proxy 
 
 import Game.GoreAndAsh
 import Game.GoreAndAsh.Async.State
@@ -56,7 +57,7 @@
       })
   
   newModuleState = emptyAsyncState <$> newModuleState
-  withModule _ = id
+  withModule _ = withModule (Proxy :: Proxy m)
   cleanupModule _ = return ()
 
 -- | Polls all async values and update values