feat: refactored a shit ton of stuff

This commit is contained in:
Nick 2024-12-09 20:30:04 -06:00
parent fbdfde8680
commit 7704839038
20 changed files with 54 additions and 45 deletions

View file

@ -48,7 +48,7 @@ cardMaker =
column
[ E.width fill
, D.width 5
, centerX
, alignTop
, D.color colourTheme.backgroundDarkGrey
, D.rounded 32
, glowDeepDarkGrey

View file

@ -5,7 +5,7 @@ import Element.Font as F
paragraphFontSize : Attr decorative msg
paragraphFontSize =
F.size 17
F.size 16
paragraphSpacing : Attribute msg

View file

@ -10,19 +10,30 @@ topLevelContainer =
el
[ width fill
, height fill
, centerX
, B.color colourTheme.backgroundLightGrey
, height fill
, scrollbarY
]
pageListDesktop : List (Attribute msg)
pageListDesktop =
pageList : List (Attribute msg)
pageList =
[ alignTop
]
++ pageListFormat
pageListCenter : List (Attribute msg)
pageListCenter =
[ centerY
]
++ pageListFormat
pageListFormat : List (Attribute msg)
pageListFormat =
[ spacing 30
, centerX
, alignTop
, height fill
, paddingEach { top = 30, bottom = 30, left = 30, right = 30 }
, width (fill |> minimum 100)
, width (fill |> maximum 875)

View file

@ -1,7 +1,7 @@
module Config.Helpers.StrengthBar exposing (..)
import Config.Helpers.ToolTip exposing (..)
import Config.Style.Colour exposing (..)
import Config.Style.Colour exposing (colourTheme)
import Element as E exposing (..)
import Element.Background as B
import Element.Border as D

View file

@ -1,6 +1,6 @@
module Config.Helpers.ToolTip exposing (..)
import Config.Style.Colour exposing (..)
import Config.Style.Colour exposing (colourTheme)
import Config.Style.Transitions exposing (transitionStyleSlow)
import Element as E exposing (..)
import Element.Background as B

View file

@ -8,7 +8,7 @@ import Config.Helpers.StrengthBar
, barPadding
)
import Config.Helpers.ToolTip exposing (..)
import Config.Style.Colour exposing (..)
import Config.Style.Colour exposing (colourTheme)
import Config.Style.Transitions
exposing
( hoverFontDarkOrange

View file

@ -564,7 +564,7 @@ desktopFormalizationMaker argument =
mobileFormalizationMaker : Argument -> Element msg
mobileFormalizationMaker argument =
formalizationMaker argument argumentDesktopPadding
formalizationMaker argument argumentMobilePadding
formalizationMaker : Argument -> Attribute msg -> Element msg
@ -603,10 +603,10 @@ formalizationMaker argument padding =
]
[ text
(if entryIndex < List.length argumentEntry.premises then
"P" ++ String.fromInt (entryIndex + 1) ++ ")"
"P" ++ String.fromInt (entryIndex + 1) ++ ") "
else
"C)"
"C) "
)
, text
(if entryIndex < List.length argumentEntry.premises then
@ -619,12 +619,6 @@ formalizationMaker argument padding =
[ F.color colourTheme.textLightGrey
, F.regular
, E.width fill
, paddingEach
{ top = 0
, right = 0
, bottom = 0
, left = 5
}
]
]
, paragraph