From 9dc078094f318f0a5a2024fcae98f3ebbfeeb12f Mon Sep 17 00:00:00 2001 From: Brooke Date: Fri, 17 Aug 2018 15:47:05 -0700 Subject: [PATCH] make LinkSpa work --- src/Nri/Ui/Button/V3.elm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/src/Nri/Ui/Button/V3.elm b/src/Nri/Ui/Button/V3.elm index a0304180..86de4a33 100644 --- a/src/Nri/Ui/Button/V3.elm +++ b/src/Nri/Ui/Button/V3.elm @@ -67,6 +67,7 @@ import Accessibility.Styled.Role as Role import Accessibility.Styled.Widget as Widget import Css exposing (..) import Css.Foreign +import EventExtras import Html.Styled as Html import Html.Styled.Attributes as Attributes exposing (..) import Html.Styled.Events as Events exposing (onClick) @@ -428,7 +429,8 @@ linkSpa : -> Html msg linkSpa toUrl toMsg config = linkBase - [-- EventExtras.onClickPreventDefaultForLinkWithHref (toMsg config.route) TODO + [ EventExtras.onClickPreventDefaultForLinkWithHref (toMsg config.route) + |> Attributes.fromUnstyled ] { label = config.label , icon = config.icon