aboutsummaryrefslogtreecommitdiff
path: root/src/View/Button.ml
diff options
context:
space:
mode:
Diffstat (limited to 'src/View/Button.ml')
-rw-r--r--src/View/Button.ml8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/View/Button.ml b/src/View/Button.ml
index 723b7d1..b4641d2 100644
--- a/src/View/Button.ml
+++ b/src/View/Button.ml
@@ -1,19 +1,19 @@
let raw attrs content =
H.button
- (HA.concat attrs [| HA.class_ "g-Button__Raw" |])
+ (HA.concat [| HA.class_ "g-Button__Raw" |] attrs)
content
let text attrs content =
H.button
- (HA.concat attrs [| HA.class_ "g-Button__Text" |])
+ (HA.concat [| HA.class_ "g-Button__Text" |] attrs)
content
let action attrs content =
H.button
- (HA.concat attrs [| HA.class_ "g-Button__Action" |])
+ (HA.concat [| HA.class_ "g-Button__Action" |] attrs)
content
let cancel attrs content =
H.button
- (HA.concat attrs [| HA.class_ "g-Button__Cancel" |])
+ (HA.concat [| HA.class_ "g-Button__Cancel" |] attrs)
content