Skip to content

Commit bab40a0

Browse files
Dave ZuchDave Zuch
authored andcommitted
Add Ocelot.Button.buttonClearCenter_ for completeness
`Ocelot.Button.buttonClearCenter` was the only button without a null props alternate. Obviously that hasn't been an issue, but we add the alternate for completeness.
1 parent a5f802d commit bab40a0

File tree

1 file changed

+7
-0
lines changed

1 file changed

+7
-0
lines changed

src/Button.purs

Lines changed: 7 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -6,6 +6,7 @@ module Ocelot.Button
66
, buttonClasses
77
, buttonClear
88
, buttonClearCenter
9+
, buttonClearCenter_
910
, buttonClearClasses
1011
, buttonClearLeft
1112
, buttonClearLeft_
@@ -122,6 +123,12 @@ buttonClearCenter
122123
buttonClearCenter =
123124
buttonGroupBuilder $ buttonClearClasses <> centerClasses
124125

126+
buttonClearCenter_
127+
:: p i
128+
. Array (Halogen.HTML.HTML p i)
129+
-> Halogen.HTML.HTML p i
130+
buttonClearCenter_ = buttonClearCenter []
131+
125132
buttonClearClasses :: Array Halogen.HTML.ClassName
126133
buttonClearClasses = Halogen.HTML.ClassName <$>
127134
[ "bg-transparent"

0 commit comments

Comments
 (0)