removing a warning.
commitc25a6851d9f87c9f1581c3cdb48d6dbd25e0a9c0
authorKazu Yamamoto <kazu@iij.ad.jp>
dateThu 16 Jun 2016, 14:54 (10 years ago)
parent397d4e0
warp/Network/Wai/Handler/Warp/WithApplication.hs+1−1
@@ -66,7 +66,7 @@ testWithApplication = testWithApplicationSettings defaultSettings
6666--
6767-- @since 3.2.7
6868testWithApplicationSettings :: Settings -> IO Application -> (Port -> IO a) -> IO a
69−testWithApplicationSettings settings mkApp action = do
69+testWithApplicationSettings _settings mkApp action = do
7070 callingThread <- myThreadId
7171 app <- mkApp
7272 let wrappedApp request respond =