diff --git a/yesod-test/Yesod/Test.hs b/yesod-test/Yesod/Test.hs
index a06f3957..f2285c0a 100644
--- a/yesod-test/Yesod/Test.hs
+++ b/yesod-test/Yesod/Test.hs
@@ -245,7 +245,7 @@ import Network.Wai.Test hiding (assertHeader, assertNoHeader, request)
 import Control.Monad.Trans.Reader (ReaderT (..))
 import Conduit (MonadThrow)
 import Control.Monad.IO.Class
-import Control.Monad.State.Class
+import qualified Control.Monad.State.Class as MS
 import System.IO
 import Yesod.Core.Unsafe (runFakeHandler)
 import Yesod.Test.TransversingCSS
@@ -1602,7 +1602,7 @@ instance YesodDispatch site => Hspec.Example (SIO (YesodExampleData site) a) whe
 newtype SIO s a = SIO (ReaderT (IORef s) IO a)
   deriving (Functor, Applicative, Monad, MonadIO, MonadThrow, MonadUnliftIO)
 
-instance MonadState s (SIO s)
+instance MS.MonadState s (SIO s)
   where
   get = getSIO
   put = putSIO