about summary refs log tree commit diff
path: root/website/sandbox/learnpianochords/src/Tailwind.elm
blob: 57d419db5a82e136974d69d0cb2affa84b15aeac (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
module Tailwind exposing (..)

{-| Functions to make Tailwind development in Elm even more pleasant.
-}


{-| Conditionally use `class` selection when `condition` is true.
-}
when : Bool -> String -> String
when condition class =
    if condition then
        class

    else
        ""


if_ : Bool -> String -> String -> String
if_ condition whenTrue whenFalse =
    if condition then
        whenTrue

    else
        whenFalse


use : List String -> String
use styles =
    String.join " " styles