A music player that connects to your cloud/distributed storage.
Replace all accent colors
+48
-25
+19
-5
src/Applications/UI/Alfred/View.elm
+19
-5
src/Applications/UI/Alfred/View.elm
···
2
2
3
3
import Alfred exposing (Alfred)
4
4
import Chunky exposing (..)
5
+
import Color exposing (Color)
5
6
import Css.Classes as C
6
7
import Html exposing (Html, text)
7
-
import Html.Attributes exposing (autofocus, id, placeholder, type_)
8
+
import Html.Attributes exposing (autofocus, id, placeholder, style, type_)
8
9
import Html.Events exposing (onInput)
9
10
import Html.Ext exposing (onTapPreventDefault)
10
11
import Json.Decode
11
12
import List.Extra as List
12
13
import Material.Icons as Icons
13
14
import Material.Icons.Types exposing (Coloring(..))
15
+
import Maybe.Extra as Maybe
14
16
import String.Ext as String
15
17
import UI.Types as UI
16
18
···
19
21
-- 🗺
20
22
21
23
22
-
view : Maybe (Alfred UI.Msg) -> Html UI.Msg
23
-
view maybeInstance =
24
+
view : Maybe (Alfred UI.Msg) -> Maybe Color -> Html UI.Msg
25
+
view maybeInstance extractedBackdropColor =
26
+
let
27
+
bgColor =
28
+
Maybe.unwrap "inherit" Color.toCssString extractedBackdropColor
29
+
in
24
30
case maybeInstance of
25
31
Just instance ->
26
32
chunk
···
115
121
(List.indexedMap
116
122
(\idx result ->
117
123
brick
118
-
[ onTapPreventDefault (UI.SelectAlfredItem idx) ]
124
+
[ onTapPreventDefault (UI.SelectAlfredItem idx)
125
+
126
+
--
127
+
, if idx == instance.focus then
128
+
style "background-color" bgColor
129
+
130
+
else
131
+
style "background-color" "inherit"
132
+
]
119
133
[ C.p_4
120
134
, C.relative
121
135
, C.truncate
···
129
143
130
144
--
131
145
, if idx == instance.focus then
132
-
C.bg_accent
146
+
C.bg_base00
133
147
134
148
else if modBy 2 idx == 0 then
135
149
C.bg_transparent
+6
-6
src/Applications/UI/Kit.elm
+6
-6
src/Applications/UI/Kit.elm
···
133
133
Filled ->
134
134
case buttonColor of
135
135
Accent ->
136
-
[ C.bg_accent
136
+
[ C.bg_black_35
137
137
, C.border_transparent
138
-
, C.text_white
138
+
, C.text_white_90
139
139
]
140
140
141
141
Blank ->
···
163
163
case buttonColor of
164
164
Accent ->
165
165
[ C.bg_transparent
166
-
, C.border_accent
167
-
, C.text_accent
166
+
, C.border_base04
167
+
, C.text_base04
168
168
]
169
169
170
170
Blank ->
···
391
391
Html.a
392
392
[ href params.url ]
393
393
[ C.border_b_2
394
-
, C.border_accent
394
+
, C.border_base04
395
395
, C.inline_block
396
396
, C.leading_none
397
397
, C.no_underline
···
536
536
[ onClick params.onClick ]
537
537
[ C.appearance_none
538
538
, C.bg_transparent
539
-
, C.border_accent
539
+
, C.border_base04
540
540
, C.border_b_2
541
541
, C.text_inherit
542
542
, C.leading_tight
+15
-5
src/Applications/UI/List.elm
+15
-5
src/Applications/UI/List.elm
···
44
44
45
45
view : Variant Int msg -> List (Item msg) -> Html msg
46
46
view variant items =
47
-
items
48
-
|> List.indexedMap (item variant)
49
-
|> brick [ style "font-size" "13px" ] [ C.antialiased, C.font_semibold, C.leading_snug ]
47
+
brick
48
+
[ style "font-size" "13px" ]
49
+
[ C.antialiased, C.font_semibold, C.leading_snug ]
50
+
(List.indexedMap (item variant) items)
50
51
51
52
52
53
···
71
72
72
73
--
73
74
, if dragTarget then
74
-
C.border_accent
75
+
C.border_base03
75
76
76
77
else
77
78
C.border_transparent
79
+
80
+
-- Dark mode
81
+
------------
82
+
, if dragTarget then
83
+
C.dark__border_gray_300
84
+
85
+
else
86
+
C.dark__border_transparent
78
87
]
79
88
<|
80
89
chunk
···
85
94
86
95
--
87
96
, ifThenElse (Maybe.isJust msg) C.cursor_pointer ""
88
-
, ifThenElse isSelected C.text_accent ""
97
+
, ifThenElse isSelected C.text_base03 ""
89
98
90
99
-- Dark mode
91
100
------------
92
101
, C.dark__border_base00
102
+
, ifThenElse isSelected C.dark__text_gray_300 ""
93
103
]
94
104
[ -- Label
95
105
--------
+1
-1
src/Applications/UI/Settings.elm
+1
-1
src/Applications/UI/Settings.elm
+1
-1
src/Applications/UI/View.elm
+1
-1
src/Applications/UI/View.elm
+6
-7
system/Css/Tailwind.js
+6
-7
system/Css/Tailwind.js
···
20
20
base0c: "rgb(91, 196, 191)",
21
21
base0d: "rgb(6, 182, 239)",
22
22
base0e: "rgb(129, 91, 164)",
23
-
base0f: "rgb(233, 107, 168)",
24
-
25
-
accent: "rgb(231, 150, 128)",
23
+
base0f: "rgb(233, 107, 168)"
26
24
}
27
25
28
26
···
97
95
...defaultTheme.colors,
98
96
...colors,
99
97
100
-
"accent-dark": "hsl(240, 8.9%, 82.4%)",
101
-
"accent-light": "hsl(340, 3.1%, 62%)",
98
+
"accent-dark": "hsl(304.3, 9.6%, 71.4%)",
99
+
"accent-light": "hsl(228.4, 15.3%, 60.2%)",
102
100
"background": "rgb(2, 7, 14)",
103
101
"base01-15": "rgba(63, 63, 63, 0.15)",
104
102
"base01-55": "rgba(63, 63, 63, 0.55)",
105
-
"black_05": "rgba(0, 0, 0, 0.05)",
106
-
"black_50": "rgba(0, 0, 0, 0.5)",
103
+
"black-05": "rgba(0, 0, 0, 0.05)",
104
+
"black-35": "rgba(0, 0, 0, 0.35)",
105
+
"black-50": "rgba(0, 0, 0, 0.5)",
107
106
"current-color": "currentColor",
108
107
"inherit": "inherit",
109
108
"white-025": "rgba(255, 255, 255, 0.025)",