diff --git a/Test.hs b/Test.hs
index 2cadefad1b..1274f974ba 100644
--- a/Test.hs
+++ b/Test.hs
@@ -759,7 +759,7 @@ test_crypto env = "git-annex crypto" ~: intmpclonerepo env $ when Build.SysConfi
 		not <$> git_annex env "drop" [annexedfile, "--numcopies=2"] @? "drop failed to fail"
 		annexed_present annexedfile
 #else
-		print "gpg testing not implemented on Windows"
+		putStrLn "gpg testing not implemented on Windows"
 #endif
 
 -- This is equivilant to running git-annex, but it's all run in-process