diff --git a/src/Views.elm b/src/Views.elm index f6a702c..2408f9e 100644 --- a/src/Views.elm +++ b/src/Views.elm @@ -37,7 +37,7 @@ view model = , Font.family [ Font.typeface "Cantarell" ] ] (Element.column - [ Element.width Element.fill ] + [ Element.width Element.fill, Element.height Element.fill ] [ topBar, element ] ) ] @@ -294,7 +294,7 @@ videoView device zone playlist video = ( builder, contentPadding ) = case device.class of Element.Phone -> - ( Element.column [ Element.width Element.fill, Element.spacing 10 ] + ( Element.column [ Element.width Element.fill, Element.height Element.fill, Element.spacing 10 ] , Element.paddingXY 10 0 ) @@ -308,6 +308,7 @@ videoView device zone playlist video = [ Element.width (Element.fillPortion 2) , Element.spacing 10 , Element.alignTop + , Element.height Element.fill ] [ Keyed.el [ Element.width Element.fill @@ -352,6 +353,8 @@ videoView device zone playlist video = , Element.alignTop , Element.spacing 10 , Element.width (Element.fillPortion 1) + , Element.height Element.fill + , Element.scrollbarY ] (List.map (videoInList zone playlist video) playlist.videos) ]