{-# LANGUAGE OverloadedStrings #-}
module Lucid.HTMX where
import Lucid.Base (Attribute, makeAttribute)
import Data.Text (Text)
hxBoost_ :: Text -> Attribute
hxBoost_ = makeAttribute "data-hx-boost"
hxConfirm_ :: Text -> Attribute
hxConfirm_ = makeAttribute "data-hx-confirm"
hxDelete_ :: Text -> Attribute
hxDelete_ = makeAttribute "data-hx-delete"
hxDisable_ :: Attribute
hxDisable_ = makeAttribute "data-hx-disable" mempty
hxEncoding_ :: Text -> Attribute
hxEncoding_ = makeAttribute "data-hx-encoding"
hxExt_ :: Text -> Attribute
hxExt_ = makeAttribute "data-hx-ext"
hxGet_ :: Text -> Attribute
hxGet_ = makeAttribute "data-hx-get"
hxHeaders_ :: Text -> Attribute
hxHeaders_ = makeAttribute "data-hx-headers"
hxHistoryElt_ :: Attribute
hxHistoryElt_ = makeAttribute "data-hx-history-elt" mempty
hxInclude_ :: Text -> Attribute
hxInclude_ = makeAttribute "data-hx-include"
hxIndicator_ :: Text -> Attribute
hxIndicator_ = makeAttribute "data-hx-indicator"
hxParams_ :: Text -> Attribute
hxParams_ = makeAttribute "data-hx-params"
hxPatch_ :: Text -> Attribute
hxPatch_ = makeAttribute "data-hx-patch"
hxPost_ :: Text -> Attribute
hxPost_ = makeAttribute "data-hx-post"
hxPreserve_ :: Text -> Attribute
hxPreserve_ = makeAttribute "data-hx-preserve"
hxPrompt_ :: Text -> Attribute
hxPrompt_ = makeAttribute "data-hx-prompt"
hxPushUrl_ :: Text -> Attribute
hxPushUrl_ = makeAttribute "data-hx-push-url"
hxPut_ :: Text -> Attribute
hxPut_ = makeAttribute "data-hx-put"
hxRequest_ :: Text -> Attribute
hxRequest_ = makeAttribute "data-hx-request"
hxSelect_ :: Text -> Attribute
hxSelect_ = makeAttribute "data-hx-select"
hxSse_ :: Text -> Attribute
hxSse_ = makeAttribute "data-hx-sse"
hxSwapOob_ :: Text -> Attribute
hxSwapOob_ = makeAttribute "data-hx-swap-oob"
hxSwap_ :: Text -> Attribute
hxSwap_ = makeAttribute "data-hx-swap"
hxTarget_ :: Text -> Attribute
hxTarget_ = makeAttribute "data-hx-target"
hxTrigger_ :: Text -> Attribute
hxTrigger_ = makeAttribute "data-hx-trigger"
hxVals_ :: Text -> Attribute
hxVals_ = makeAttribute "data-hx-vals"
hxWs_ :: Text -> Attribute
hxWs_ = makeAttribute "data-hx-ws"