packages feed

wai-app-static 3.1.0 → 3.1.0.1

raw patch · 2 files changed

+9/−7 lines, 2 filesdep ~warp

Dependency ranges changed: warp

Files

WaiAppStatic/CmdLine.hs view
@@ -8,7 +8,7 @@ import Network.Wai (Middleware) import Network.Wai.Application.Static (staticApp, defaultFileServerSettings) import Network.Wai.Handler.Warp-    ( runSettings, defaultSettings, settingsHost, settingsPort+    ( runSettings, defaultSettings, setHost, setPort     ) import Options.Applicative import Text.Printf (printf)@@ -100,10 +100,12 @@     let middle = gzip def { gzipFiles = GzipCompress }                . (if verbose then logStdout else id)                . (middleware args)-    runSettings defaultSettings-        { settingsPort = port-        , settingsHost = fromString host-        } $ middle $ staticApp (defaultFileServerSettings $ fromString docroot)+    runSettings+        ( setPort port+        $ setHost (fromString host)+          defaultSettings+        )+        $ middle $ staticApp (defaultFileServerSettings $ fromString docroot)         { ssIndices = if noindex then [] else mapMaybe (toPiece . pack) index         , ssGetMimeType = return . mimeByExt mimeMap defaultMimeType . fromPiece . fileName         }
wai-app-static.cabal view
@@ -1,5 +1,5 @@ name:            wai-app-static-version:         3.1.0+version:         3.1.0.1 license:         MIT license-file:    LICENSE author:          Michael Snoyman <michael@snoyman.com>@@ -51,7 +51,7 @@                    , filepath                    , wai-extra                 >= 3.0      && < 3.1                    , optparse-applicative      >= 0.7-                   , warp                      >= 3.0.11   && < 3.1+                   , warp                      >= 3.0.11   && < 3.2                    -- Used exclusively for hashFile function                    , cryptohash-conduit