@@ -7,7 +7,7 @@ import Control.Monad.Aff.AVar (AVAR, makeVar, makeVar', modifyVar, pe
77import Control.Monad.Aff.Console (log)
88import Control.Monad.Eff (Eff)
99import Control.Monad.Eff.Class (liftEff)
10−import Control.Monad.Eff.Exception (EXCEPTION, message)
10+import Control.Monad.Eff.Exception (EXCEPTION, name)
1111import Control.Monad.Eff.Now (NOW, now)
1212import Data.Date as Date
1313import Data.DateTime as DateTime
@@ -659,7 +659,7 @@ main = runMocha do
659659 cursor <- attempt $ IDBIndex.openKeyCursor index Nothing Next cb
660660 case cursor of
661661 Right _ -> fail "expected InvalidStateError"
662− Left err -> message err `shouldEqual` "InvalidStateError"
662+ Left err -> name err `shouldEqual` "InvalidStateError"
663663 }
664664 case res of
665665 Right _ -> fail "expected InvalidStateError"
@@ -687,7 +687,7 @@ main = runMocha do
687687 cursor <- attempt $ IDBIndex.openKeyCursor index Nothing Next cb
688688 case cursor of
689689 Right _ -> fail "expected TransactionInactiveError"
690− Left err -> message err `shouldEqual` "TransactionInactiveError"
690+ Left err -> name err `shouldEqual` "TransactionInactiveError"
691691
692692 tearDown db
693693
@@ -709,7 +709,7 @@ main = runMocha do
709709 cursor <- attempt $ IDBIndex.openKeyCursor index Nothing Next cb
710710 case cursor of
711711 Right _ -> fail "expected InvalidStateError"
712− Left err -> message err `shouldEqual` "InvalidStateError"
712+ Left err -> name err `shouldEqual` "InvalidStateError"
713713 }
714714
715715 tearDown db
@@ -733,7 +733,7 @@ main = runMocha do
733733 cursor <- attempt $ IDBIndex.openCursor index Nothing Next cb
734734 case cursor of
735735 Right _ -> fail "expected InvalidStateError"
736− Left err -> message err `shouldEqual` "InvalidStateError"
736+ Left err -> name err `shouldEqual` "InvalidStateError"
737737 }
738738 case res of
739739 Right _ -> fail "expected InvalidStateError"
@@ -761,7 +761,7 @@ main = runMocha do
761761 cursor <- attempt $ IDBIndex.openCursor index Nothing Next cb
762762 case cursor of
763763 Right _ -> fail "expected TransactionInactiveError"
764− Left err -> message err `shouldEqual` "TransactionInactiveError"
764+ Left err -> name err `shouldEqual` "TransactionInactiveError"
765765
766766 tearDown db
767767
@@ -783,7 +783,7 @@ main = runMocha do
783783 cursor <- attempt $ IDBIndex.openCursor index Nothing Next cb
784784 case cursor of
785785 Right _ -> fail "expected InvalidStateError"
786− Left err -> message err `shouldEqual` "InvalidStateError"
786+ Left err -> name err `shouldEqual` "InvalidStateError"
787787 }
788788
789789 tearDown db
@@ -920,7 +920,7 @@ main = runMocha do
920920 res <- attempt $ IDBCursor.continue cursor (Just 1)
921921 case res of
922922 Left err -> do
923− message err `shouldEqual` "DataError"
923+ name err `shouldEqual` "DataError"
924924 putVar vdone unit
925925 Right _ -> do
926926 fail "expected continue to fail"
@@ -1058,7 +1058,7 @@ main = runMocha do
10581058 res <- attempt $ IDBCursor.update cursor "patate"
10591059 case res of
10601060 Left err -> do
1061− message err `shouldEqual` "ReadOnlyError"
1061+ name err `shouldEqual` "ReadOnlyError"
10621062 putVar vdone unit
10631063 Right _ ->
10641064 fail $ "expected ReadOnlyError"