diff --git a/serversession-backend-redis/tests/Main.hs b/serversession-backend-redis/tests/Main.hs index cda1a2c..4574d43 100644 --- a/serversession-backend-redis/tests/Main.hs +++ b/serversession-backend-redis/tests/Main.hs @@ -10,5 +10,5 @@ import qualified Control.Exception as E main :: IO () main = do conn <- connect defaultConnectInfo - hspec $ describe "AcidStorage on memory only" $ parallel $ + hspec $ describe "RedisStorage" $ parallel $ allStorageTests (RedisStorage conn) it runIO shouldBe shouldReturn shouldThrow