mirror of
https://gitlab.com/upRootNutrition/website.git
synced 2025-06-16 04:25:11 -05:00
feat: very close to v1
This commit is contained in:
parent
a9fb4fb14b
commit
cf580a71d0
38 changed files with 428 additions and 246 deletions
|
@ -33,6 +33,7 @@ import Route exposing (Route)
|
|||
import Route.Path as Path
|
||||
import Shared
|
||||
import View exposing (View)
|
||||
import Config.Helpers.Viewport exposing (resetViewport)
|
||||
|
||||
|
||||
page : Shared.Model -> Route () -> Page Model Msg
|
||||
|
@ -62,11 +63,14 @@ type alias Model =
|
|||
init : () -> ( Model, Effect Msg )
|
||||
init () =
|
||||
( {}
|
||||
, Effect.none
|
||||
, Effect.map
|
||||
(\_ -> NoOp)
|
||||
(Effect.sendCmd resetViewport)
|
||||
)
|
||||
|
||||
|
||||
|
||||
|
||||
-- UPDATE
|
||||
|
||||
|
||||
|
@ -114,7 +118,7 @@ elmBuildsList device =
|
|||
column
|
||||
(case ( device.class, device.orientation ) of
|
||||
_ ->
|
||||
pageList
|
||||
pageList device
|
||||
)
|
||||
<|
|
||||
List.concat
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue