mdgriffith/elm-ui
1
1
Fork 0
mirror of https://github.com/mdgriffith/elm-ui.git synced 2024-11-25 19:15:09 +03:00
Code Issues Projects Releases Wiki Activity

resolves #103

Browse Source
This commit is contained in:
Matthew Griffith 2019-07-06 08:12:25 -04:00
parent 99c50968b9
commit df18305563
2 changed files with 17 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/Element.elm
View File

@ -1143,6 +1143,8 @@ link attrs { url, label } =
(classes.contentCenterX
++ " "
++ classes.contentCenterY
++ " "
++ classes.link
)
:: attrs
)
@ -1166,7 +1168,13 @@ newTabLink attrs { url, label } =
:: Internal.Attr (Html.Attributes.target "_blank")
:: width shrink
:: height shrink
:: Internal.htmlClass (classes.contentCenterX ++ " " ++ classes.contentCenterY)
:: Internal.htmlClass
(classes.contentCenterX
++ " "
++ classes.contentCenterY
++ " "
++ classes.link
)
:: attrs
)
(Internal.Unkeyed [ label ])

12
src/Internal/Style.elm
View File

@ -253,6 +253,9 @@ classes =
, inputText = "it"
, inputMultiline = "iml"
, inputMultilineParent = "imlp"
-- link
, link = "lnk"
}
@ -1222,15 +1225,16 @@ baseSheet =
, Descriptor (dot classes.widthExact)
[ Prop "flex-basis" "auto"
]
, Descriptor (dot classes.link)
[ Prop "flex-basis" "auto"
]
]
, Child (dot classes.heightFill)
[ --Prop "height" "100%"
-- alignTop, centerY, and alignBottom need to be disabled
[ -- alignTop, centerY, and alignBottom need to be disabled
Prop "align-self" "stretch !important"
]
, Child (dot classes.heightFillPortion)
[ --Prop "height" "100%"
-- alignTop, centerY, and alignBottom need to be disabled
[ -- alignTop, centerY, and alignBottom need to be disabled
Prop "align-self" "stretch !important"
]