yesod-static 1.1.1.2 → 1.1.2

raw patch · 2 files changed

+2/−34 lines, 2 filesdep ~http-types

Dependency ranges changed: http-types

Files

• Yesod/Static.hs +0/−32
• yesod-static.cabal +2/−2

@@ -331,35 +331,3 @@     tr '+' = '-'     tr '/' = '_'     tr c   = c--{- FIXME--- | Dispatch static route for a subsite------ Subsites with static routes can't (yet) define Static routes the same way "master" sites can.--- Instead of a subsite route:--- /static StaticR Static getStatic--- Use a normal route:--- /static/*Strings StaticR GET------ Then, define getStaticR something like:--- getStaticR = getStaticHandler ($(mkEmbedFiles "static") typeByExt) StaticR--- */ end CPP comment-getStaticHandler :: Static -> (StaticRoute -> Route sub) -> [String] -> GHandler sub y ChooseRep-getStaticHandler static toSubR pieces = do-  toMasterR <- getRouteToMaster-  toMasterHandler (toMasterR . toSubR) toSub route handler-  where route = StaticRoute pieces []-        toSub _ = static-        staticSite = getSubSite :: Site (Route Static) (String -> Maybe (GHandler Static y ChooseRep))-        handler = fromMaybe notFound $ handleSite staticSite (error "Yesod.Static: getSTaticHandler") route "GET"--}---{--calcHash :: Prelude.FilePath -> IO String-calcHash fname =-    withBinaryFile fname ReadMode hashHandle-  where-    hashHandle h = do s <- L.hGetContents h-                      return $! base64md5 s-                      -}

@@ -1,5 +1,5 @@ name:            yesod-static-version:         1.1.1.2+version:         1.1.2 license:         MIT license-file:    LICENSE author:          Michael Snoyman <michael@snoyman.com>@@ -34,7 +34,7 @@                    , wai                   >= 1.3      && < 1.4                    , text                  >= 0.9                    , file-embed            >= 0.0.4.1  && < 0.5-                   , http-types            >= 0.7      && < 0.8+                   , http-types            >= 0.7                    , unix-compat           >= 0.2                    , conduit               >= 0.5      && < 0.6                    , crypto-conduit        >= 0.4      && < 0.5