feat: version 1 done?

This commit is contained in:
Nick 2024-12-23 03:15:35 -06:00
parent cf580a71d0
commit d1ba50abd8
30 changed files with 668 additions and 261 deletions

View file

@ -0,0 +1,62 @@
module Config.Helpers.ImageFolders exposing (..)
imagePathMaker : ImageFolder -> String -> String
imagePathMaker imageFolder name =
case imageFolder of
Cuck ->
"/" ++ getImageFolderString imageFolder ++ "/" ++ name ++ "/" ++ name ++ ".png"
_ ->
"/" ++ getImageFolderString imageFolder ++ "/" ++ name ++ ".png"
getImageFolderString : ImageFolder -> String
getImageFolderString imageFolder =
case imageFolder of
Interviews ->
"interviews"
Gibberish ->
"gibberish"
Cuck ->
"cucks"
BlogArticle ->
"blog"
BlogCard ->
"blog/thumbs"
Argument ->
"arguments"
Service ->
"services"
Debate ->
"debate"
Donate ->
"donate"
NutriDex ->
"nutridex"
ServicePage ->
"services"
type ImageFolder
= Interviews
| Gibberish
| Cuck
| BlogArticle
| BlogCard
| Argument
| Service
| Debate
| Donate
| NutriDex
| ServicePage