git.iko.soy/typeable/elm-ui
on master help sign in
fixes #3
4a25c6dMatthew Griffith
src/Element/Input.elm+11
compare with master
unifiedsplit
@@ -777,6 +777,16 @@ textHelper textInput attrs textOptions =
777 , [ Internal.unstyled (Html.text textOptions.text) ]
777 , [ Internal.unstyled (Html.text textOptions.text) ]
778 )
778 )
779
779
780+ heightFillFromChild =
781+ Internal.get attributes <|
782+ \attr ->
783+ case attr of
784+ Internal.Height (Internal.Fill _) ->
785+ True
786+
787+ _ ->
788+ False
789+
780 attributesFromChild =
790 attributesFromChild =
781 Internal.get attributes <|
791 Internal.get attributes <|
782 \attr ->
792 \attr ->
@@ -832,6 +842,7 @@ textHelper textInput attrs textOptions =
832 (Element.width Element.fill
842 (Element.width Element.fill
833 :: List.concat
843 :: List.concat
834 [ nearbys
844 [ nearbys
845+ , heightFillFromChild
835 , case textOptions.placeholder of
846 , case textOptions.placeholder of
836 Nothing ->
847 Nothing ->
837 []
848 []