Fix copy-paste.
This commit is contained in:
parent
bdd6db9e2a
commit
92fbee20da
@ -10,5 +10,5 @@ import qualified Control.Exception as E
|
|||||||
main :: IO ()
|
main :: IO ()
|
||||||
main = do
|
main = do
|
||||||
conn <- connect defaultConnectInfo
|
conn <- connect defaultConnectInfo
|
||||||
hspec $ describe "AcidStorage on memory only" $ parallel $
|
hspec $ describe "RedisStorage" $ parallel $
|
||||||
allStorageTests (RedisStorage conn) it runIO shouldBe shouldReturn shouldThrow
|
allStorageTests (RedisStorage conn) it runIO shouldBe shouldReturn shouldThrow
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user