eeva/servant
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Correct spacing in StaticFiles.hs

Browse source
This commit is contained in:
Alexander Vieth 2015-12-02 16:11:01 -05:00
parent 5d40b7787f
commit 9b89381e7f
1 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
servant-server/src/Servant/Utils/StaticFiles.hs
View file

@ -7,12 +7,12 @@ module Servant.Utils.StaticFiles (
serveDirectory, serveDirectory,
) where ) where
import Network.Wai.Application.Static (defaultFileServerSettings, import Network.Wai.Application.Static (defaultFileServerSettings,
staticApp) staticApp)
import Servant.API.Raw (Raw) import Servant.API.Raw (Raw)
import Servant.Server (Server) import Servant.Server (Server)
import System.FilePath (addTrailingPathSeparator) import System.FilePath (addTrailingPathSeparator)
import Servant.Server.Internal.RawServer (RawServer(..)) import Servant.Server.Internal.RawServer (RawServer(..))
#if !MIN_VERSION_wai_app_static(3,1,0) #if !MIN_VERSION_wai_app_static(3,1,0)
import Filesystem.Path.CurrentOS (decodeString) import Filesystem.Path.CurrentOS (decodeString)
#endif #endif