From 1bc1ef5a35e0fae15ee990fa1876cdc91a2fc4e3 Mon Sep 17 00:00:00 2001
From: Michael Snoyman <michael@snoyman.com>
Date: Tue, 7 Feb 2017 15:51:16 +0200
Subject: [PATCH] Fix a CR test failure

---
 yesod-static/test/FileGeneratorTests.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/yesod-static/test/FileGeneratorTests.hs b/yesod-static/test/FileGeneratorTests.hs
index d1bffa34..98660724 100644
--- a/yesod-static/test/FileGeneratorTests.hs
+++ b/yesod-static/test/FileGeneratorTests.hs
@@ -78,7 +78,8 @@ fileGenSpecs = do
     describe "Compress" $ do
         it "compress tool function" $ do
             out <- compressTool "runhaskell" [] "main = putStrLn \"Hello World\""
-            assertEqual "" "Hello World\n" out
+            -- 13 == CR, to make this test work on Windows
+            BL.filter (/= 13) out `shouldBe` "Hello World\n"
 
         it "tryCompressTools" $ do
             out <- flip tryCompressTools "abcdef"