{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE ExtendedDefaultRules #-} module Lucid.Foundation.Callouts.Joyride where import Lucid.Base import Lucid.Html5 import qualified Data.Text as T import Data.Monoid joyride_list_ :: T.Text joyride_list_ = " joyride-list " joyride_tip_guide_ :: T.Text joyride_tip_guide_ = " joyride-tip-guide " joyride_nub_ :: T.Text joyride_nub_ = " joyride-nub " joyride_content_wrapper_ :: T.Text joyride_content_wrapper_ = " joyride-content-wrapper " joyride_close_tip_ :: T.Text joyride_close_tip_ = " joyride-close-tip " joyride_next_tip_ :: T.Text joyride_next_tip_ = " joyride-next-tip "