NoRedInk/noredink-ui
1
1
Fork 0
mirror of https://github.com/NoRedInk/noredink-ui.git synced 2024-11-28 10:17:49 +03:00
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #57 from NoRedInk/add-custom-button

Browse Source 
Add custom button
This commit is contained in:
Jasper Woudenberg 2018-05-17 09:54:59 +02:00 committed by GitHub
commit 5c203314c6
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 16 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
src/Nri/Ui/Button/V2.elm
View File

@ -11,6 +11,7 @@ module Nri.Ui.Button.V2
, button
, buttonDeprecated
, copyToClipboard
, customButton
, delete
, link
, linkExternal
@ -178,6 +179,13 @@ This button will be Disabled if the button state is:
-}
button : ButtonConfig msg -> ButtonContent -> Html msg
button config content =
customButton [] config content
{-| Exactly the same as button but you can pass in a list of attributes
-}
customButton : List (Html.Attribute msg) -> ButtonConfig msg -> ButtonContent -> Html msg
customButton attributes config content =
let
buttonStyle =
case content.state of
@ -220,12 +228,14 @@ button config content =
True
in
Html.button
[ buttonClass config.size config.width buttonStyle
, onClick config.onClick
, Html.Attributes.disabled disabled
, Html.Attributes.type_ "button"
, widthStyle config.width
]
([ buttonClass config.size config.width buttonStyle
, onClick config.onClick
, Html.Attributes.disabled disabled
, Html.Attributes.type_ "button"
, widthStyle config.width
]
++ attributes
)
[ viewLabel content.icon content.label ]