Restrict page width

This commit is contained in:
Tessa Kelly 2021-12-03 11:40:57 -08:00
parent 434ba3cc91
commit a31da1772e

View File

@ -148,7 +148,12 @@ view_ model =
Routes.Doodad doodad -> Routes.Doodad doodad ->
case List.head (examples (\m -> m.name == doodad)) of case List.head (examples (\m -> m.name == doodad)) of
Just example -> Just example ->
Html.main_ [] Html.main_
[ css
[ maxWidth (Css.px 1400)
, margin auto
]
]
[ Example.view model.previousRoute example [ Example.view model.previousRoute example
|> Html.map (UpdateModuleStates example.name) |> Html.map (UpdateModuleStates example.name)
] ]
@ -185,6 +190,8 @@ withSideNav currentRoute content =
[ displayFlex [ displayFlex
, withMedia [ mobile ] [ flexDirection column, alignItems stretch ] , withMedia [ mobile ] [ flexDirection column, alignItems stretch ]
, alignItems flexStart , alignItems flexStart
, maxWidth (Css.px 1400)
, margin auto
] ]
] ]
[ navigation currentRoute [ navigation currentRoute