diff --git a/Language/Haskell/GhcMod/Monad.hs b/Language/Haskell/GhcMod/Monad.hs
index a34264d..b252ed1 100644
--- a/Language/Haskell/GhcMod/Monad.hs
+++ b/Language/Haskell/GhcMod/Monad.hs
@@ -63,7 +63,7 @@ newtype GhcMod a = GhcMod {
 
 #if __GLASGOW_HASKELL__ < 708
 instance (Monoid w, MonadIO m) => MonadIO (RWST r w s m) where
---  liftIO :: MonadIO m => m -> IO m
+--  liftIO :: MonadIO m => IO a -> m a
     liftIO = lift . liftIO
 #endif