diff options
| -rw-r--r-- | Bustle/Application/Monad.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Bustle/Application/Monad.hs b/Bustle/Application/Monad.hs index 7a5f749..e326f7d 100644 --- a/Bustle/Application/Monad.hs +++ b/Bustle/Application/Monad.hs @@ -94,7 +94,7 @@ embedIO act = B $ do liftIO $ act r makeCallback :: Bustle config state a -> BustleEnv config state -> IO a -makeCallback (B act) x = runReaderT act x +makeCallback (B act) = runReaderT act runB :: config -> state -> Bustle config state a -> IO a runB config s (B act) = do |