style only.
commit834720f7ed30f2451644edefc4292aee49834f71
authorKazu Yamamoto <kazu@iij.ad.jp>
dateFri 7 Sep 2018, 13:31 (8 years ago)
parentf2b132e
warp/test/ResponseHeaderSpec.hs+1−1
@@ -55,7 +55,7 @@ spec = do
5555 hdrs = []
5656 (thl, vt) <- toHeaderTable hdrs
5757 addHeader tokenServer v vt thl `shouldBe` thl
58− it "deletes Server " $ do
58+ it "deletes Server" $ do
5959 let v = ""
6060 hdrs = [("Server","MyServer")]
6161 hdrs1 = []