Searched refs:withAppTls (Results 1 – 7 of 7) sorted by relevance
147 withAppTls :: (Wai.Request -> IO Wai.Response) -> (Int -> IO ()) -> IO ()148 withAppTls app' f = withAppTls' (const app') f function220 it "TLS" $ withAppTls app $ \port -> do
145 withAppTls :: (Wai.Request -> IO Wai.Response) -> (Int -> IO ()) -> IO ()146 withAppTls app' f = withAppTls' (const app') f function218 it "TLS" $ withAppTls app $ \port -> do