mirror of
https://gitlab.com/upRootNutrition/website.git
synced 2025-06-16 04:25:11 -05:00
feat: removed boilerplate
This commit is contained in:
parent
cb51b17c08
commit
a462c01f88
14 changed files with 277 additions and 378 deletions
|
@ -89,7 +89,7 @@ subscriptions model =
|
|||
|
||||
view : Shared.Model -> Model -> View Msg
|
||||
view shared model =
|
||||
{ title = servicesName
|
||||
{ title = pageNames.pageServices
|
||||
, attributes = []
|
||||
, element = servicesContainer shared.device
|
||||
}
|
||||
|
@ -104,28 +104,7 @@ servicesList : Device -> Element msg
|
|||
servicesList device =
|
||||
column
|
||||
(case ( device.class, device.orientation ) of
|
||||
( Phone, Portrait ) ->
|
||||
pageListDesktop
|
||||
|
||||
( Phone, Landscape ) ->
|
||||
pageListDesktop
|
||||
|
||||
( Tablet, Portrait ) ->
|
||||
pageListDesktop
|
||||
|
||||
( Tablet, Landscape ) ->
|
||||
pageListDesktop
|
||||
|
||||
( Desktop, Portrait ) ->
|
||||
pageListDesktop
|
||||
|
||||
( Desktop, Landscape ) ->
|
||||
pageListDesktop
|
||||
|
||||
( BigDesktop, Portrait ) ->
|
||||
pageListDesktop
|
||||
|
||||
( BigDesktop, Landscape ) ->
|
||||
_ ->
|
||||
pageListDesktop
|
||||
)
|
||||
<|
|
||||
|
@ -136,25 +115,10 @@ servicesList device =
|
|||
( Phone, Portrait ) ->
|
||||
List.map serviceMakerMobile
|
||||
|
||||
( Phone, Landscape ) ->
|
||||
List.map serviceMakerMobile
|
||||
|
||||
( Tablet, Portrait ) ->
|
||||
List.map serviceMakerMobile
|
||||
|
||||
( Tablet, Landscape ) ->
|
||||
List.map serviceMakerMobile
|
||||
|
||||
( Desktop, Portrait ) ->
|
||||
List.map serviceMaker
|
||||
|
||||
( Desktop, Landscape ) ->
|
||||
List.map serviceMaker
|
||||
|
||||
( BigDesktop, Portrait ) ->
|
||||
List.map serviceMaker
|
||||
|
||||
( BigDesktop, Landscape ) ->
|
||||
_ ->
|
||||
List.map serviceMaker
|
||||
)
|
||||
[ servicesDebateAnalysis
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue