{-# LANGUAGE OverloadedStrings #-} module Lucid.Alpine ( xData_, xBind_, xHtml_, xCloak_, xEffect_, xFor_, xForKey_, xIf_, xIgnore_, xInit_, xModel_, xOn_, xRef_, xShow_, xText_, xTransition_, useAlpine, useAlpineVersion, ) where import Data.Text (Text, intercalate, pack) import Lucid (Html, HtmlT, defer_, script_, src_) import Lucid.Base (Attribute, makeAttribute) -- | x-data -- Declare a new Alpine component and its data for a block of HTML xData_ :: Text -> Attribute xData_ = makeAttribute "x-data" {-