From f18d333503907efbe58f4cad5ab5ea93b11d903a Mon Sep 17 00:00:00 2001
From: Nick <nickjhiebert@proton.me>
Date: Fri, 3 Jan 2025 17:52:13 -0600
Subject: [PATCH] feat: reduced mobile padding

---
 .../Config/Helpers/Cards/Outer/Helpers.elm    |  7 +---
 frontend/src/Config/Helpers/Response.elm      | 37 ++++++++++++-------
 2 files changed, 25 insertions(+), 19 deletions(-)

diff --git a/frontend/src/Config/Helpers/Cards/Outer/Helpers.elm b/frontend/src/Config/Helpers/Cards/Outer/Helpers.elm
index 0eb6574..da374cd 100755
--- a/frontend/src/Config/Helpers/Cards/Outer/Helpers.elm
+++ b/frontend/src/Config/Helpers/Cards/Outer/Helpers.elm
@@ -569,12 +569,7 @@ cardStuff content =
         ]
     <|
         el
-            [ paddingEach
-                { top = 0
-                , bottom = 0
-                , left = 15
-                , right = 15
-                }
+            [ paddingXY 15 0
             , E.width fill
             , height fill
             ]
diff --git a/frontend/src/Config/Helpers/Response.elm b/frontend/src/Config/Helpers/Response.elm
index 9a47a34..647993a 100755
--- a/frontend/src/Config/Helpers/Response.elm
+++ b/frontend/src/Config/Helpers/Response.elm
@@ -23,6 +23,7 @@ import Element as E
         , maximum
         , minimum
         , padding
+        , paddingXY
         , scrollbarY
         , spacing
         , width
@@ -56,21 +57,31 @@ pageList device =
 
 pageListFormat : Device -> List (Attribute msg)
 pageListFormat device =
-    [ case ( device.class, device.orientation ) of
-        ( Phone, Portrait ) ->
-            spacing 0
+    let
+        pageListAttr =
+            [ centerX
+            , width fill
+            , height fill
+            , scrollbarY
+            ]
+    in
+    pageListAttr
+        ++ (case ( device.class, device.orientation ) of
+                ( Phone, Portrait ) ->
+                    [ spacing 0
+                    , paddingXY 10 30
+                    ]
 
-        ( Tablet, Portrait ) ->
-            spacing 0
+                ( Tablet, Portrait ) ->
+                    [ spacing 0
+                    , paddingXY 10 30
+                    ]
 
-        _ ->
-            spacing 20
-    , centerX
-    , padding 30
-    , width fill
-    , height fill
-    , scrollbarY
-    ]
+                _ ->
+                    [ spacing 20
+                    , paddingXY 30 30
+                    ]
+           )
 
 
 contentContainer : Element msg -> Element msg