13 lines
415 B
Plaintext
13 lines
415 B
Plaintext
|
-- | `MissingHTMLProperties` provides missing properties.
|
||
|
|
-- | This shall pretty soon be removed.
|
||
|
|
module MissingHTMLProperties where
|
||
|
|
|
||
|
|
import Halogen.HTML.Properties as HP
|
||
|
|
import Halogen.HTML.Core (PropName(..),AttrName(..))
|
||
|
|
|
||
|
|
aria_current :: forall r i. String -> HP.IProp r i
|
||
|
|
aria_current = HP.attr (AttrName "aria-current")
|
||
|
|
|
||
|
|
size :: forall r i. Int -> HP.IProp (size :: Int | r) i
|
||
|
|
size = HP.prop (PropName "size")
|