idiom

1 files changed, 1 insertions, 1 deletions

diff --git a/test.hs b/test.hs
index d7a6bd152..5dda3b835 100644
--- a/test.hs
+++ b/test.hs
@@ -88,7 +88,7 @@ test_init = "git-annex init" ~: TestCase $ innewrepo $ do
 	e <- doesFileExist annexlog
 	e @? (annexlog ++ " not created")
 	c <- readFile annexlog
-	isInfixOf reponame c @? annexlog ++ " does not contain repo name"
+	reponame `isInfixOf` c @? annexlog ++ " does not contain repo name"
 	where
 		annexlog = ".git-annex/uuid.log"
 		reponame = "test repo"