From 064fd9b3779004c85570026f5a0eda155c629f42 Mon Sep 17 00:00:00 2001 From: Matvey Aksenov Date: Mon, 23 Nov 2015 22:14:49 +0000 Subject: [PATCH] shame --- test/Ldap/Client/CompareSpec.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/test/Ldap/Client/CompareSpec.hs b/test/Ldap/Client/CompareSpec.hs index ed1e93f..3383c90 100644 --- a/test/Ldap/Client/CompareSpec.hs +++ b/test/Ldap/Client/CompareSpec.hs @@ -16,7 +16,7 @@ spec = do res `shouldBe` True res `shouldBe` Right () - it "compares and looses" $ do + it "compares and loses" $ do res <- locally $ \l -> do res <- Ldap.compare l charmander (Attr "type") "flying" res `shouldBe` False