feat: very close to v1

frontend/src/Pages/Services/Elm.elm

@@ -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