servant-htmx 0.1.0.1 → 0.1.0.2

raw patch · 3 files changed

+30/−7 lines, 3 filesPVP: minor bump suggested

API additions: PVP suggests at least a minor version bump

API changes (from Hackage documentation)

Files

• ChangeLog.md +12/−1
• servant-htmx.cabal +2/−2
• src/Servant/Htmx.hs +16/−4

@@ -1,3 +1,14 @@ # Changelog for servant-htmx -## Unreleased changes+## 0.1.0.1++First release++## 0.1.0.2++Add missing HX-Request headers:++- HX-Boosted+- HX-Current-URL+- HX-HX-History-Restore-Request+- HX-Retarget

@@ -1,6 +1,6 @@ cabal-version:      1.12 name:               servant-htmx-version:            0.1.0.1+version:            0.1.0.2 license:            BSD3 license-file:       LICENSE copyright:          2022 Monadic Systems LLC@@ -8,7 +8,7 @@ author:             Monadic Systems LLC homepage:           https://github.com/MonadicSystems/servant-htmx#readme bug-reports:        https://github.com/MonadicSystems/servant-htmx/issues-synopsis:           A library for using htmx with servant+synopsis:           A library for using servant with htmx description:     Please see the README on GitHub at <https://github.com/MonadicSystems/servant-htmx#readme> 

@@ -13,13 +13,13 @@ -- -- -- | Example usage of htmx header types -- type ExampleAPI = HXRequest :> Get '[JSON] Text---                :<|> HXTriggerId :> Post '[JSON] Text---                :<|> "somePath" :> Get '[JSON] (Headers '[HXPush, HXRedirect] Text)+--                :\<|\> HXTriggerId :> Post '[JSON] Text+--                :\<|\> "somePath" :> Get '[JSON] (Headers '[HXPush, HXRedirect] Text) -- -- exampleServer :: Server ExampleAPI -- exampleServer = exampleGetHandler---              :<|> examplePostHandler---              :<|> exampleSomePathHandler+--              :\<|\> examplePostHandler+--              :\<|\> exampleSomePathHandler --  where --    exampleGetHandler :: Maybe Text -> Handler Text --    exampleGetHandler mb = case mb of@@ -49,6 +49,10 @@     HXTrigger,     HXTriggerAfterSwap,     HXTriggerAfterSettle,+    HXBoosted,+    HXCurrentURL,+    HXHistoryRestoreRequest,+    HXRetarget,   ) where @@ -76,3 +80,11 @@ type HXTriggerAfterSwap = Header "HX-Trigger-After-Swap" Text  type HXTriggerAfterSettle = Header "HX-Trigger-After-Settle" Text++type HXBoosted = Header "HX-Boosted" Text++type HXCurrentURL = Header "HX-Current-URL" Text++type HXHistoryRestoreRequest = Header "HX-History-Restore-Request" Text++type HXRetarget = Header "HX-Retarget" Text