@@ -109,7 +109,7 @@ specs = before_ setupDB $ after_ dropDB $
109 describe "Exceptions" $ do
109 describe "Exceptions" $ do
112− dupKeyErr = SquealException FatalError (Just "23505")
112+ dupKeyErr = PQException FatalError (Just "23505")
113 (Just "ERROR: duplicate key value violates unique constraint \"unique_names\"\nDETAIL: Key (name)=(TestUser) already exists.\n")
113 (Just "ERROR: duplicate key value violates unique constraint \"unique_names\"\nDETAIL: Key (name)=(TestUser) already exists.\n")
115 it "should be thrown for unique constraint violation in a manipulation" $
115 it "should be thrown for unique constraint violation in a manipulation" $