happstack-foundation 0.2.3 → 0.3.0
raw patch · 2 files changed
+4/−3 lines, 2 files
Files
Happstack/Foundation.hs view
@@ -251,12 +251,13 @@ -> AcidConfig acidState -- ^ 'AcidState' configuration -> requestState -- ^ initial @requestState@ value -> url -- ^ default URL (ie, what does / map to)+ -> Text -- ^ the base URL for the site as seen by the outside world (or, at least, by your openid provider) (e.g. "http://example.org:8000", no trailing slash) -> (url -> FoundationT url acidState requestState m a) -- ^ handler -> IO ()-simpleApp flattener FoundationConf{..} acidConfig initialReqSt defRoute route =+simpleApp flattener FoundationConf{..} acidConfig initialReqSt defRoute baseURI route = withLocalState (acidPath acidConfig) (initialState acidConfig) $ \acid -> do tid <- forkIO $ simpleHTTP httpConf $ do decodeBody bodyPolicy- implSite Text.empty Text.empty (site acid)+ implSite baseURI Text.empty (site acid) waitForTermination killThread tid where
happstack-foundation.cabal view
@@ -1,5 +1,5 @@ Name: happstack-foundation-Version: 0.2.3+Version: 0.3.0 Synopsis: Glue code for using Happstack with acid-state, web-routes, reform, and HSP Description: happstack-foundation is a library which builds on top of existing components to provide a powerful and type-safe environment for web development. It uses: