on master help sign in
Moved sources below
commit0384e5cb826c4093ab2706ebb159a7f240679bf2 authoriko <mail@iko.soy> dateSat 26 Aug 2023, 11:15 (3 years ago) parent4dab0de
1 file changed+42−40
frontend/src/Main.elm+42−40
frontend/src/Main.elm+42−40
@@ -160,51 +160,53 @@ view model =
160160 ]
161161
162162 Just _ ->
163− column [ width (minimum 0 fill), spacing 16 ]
164− [ row [ spacing 16, width (minimum 0 fill) ]
165− [ searchView model |> el [ padding 8 ]
166− , model.engines
167− |> List.filter (\( _, state ) -> state /= Failed)
168− |> List.map
169− (\( name, state ) ->
170− text ("%" ++ name)
171− |> el
172− ([ Font.size 16
173− , Font.bold
174− ]
175− ++ (if Set.isEmpty model.selectedEngines then
176− []
177−
178− else if Set.member name model.selectedEngines then
179− []
163+ column [ width fill, spacing 16 ]
164+ [ column [ spacing 16, width (minimum 0 fill), padding 8 ]
165+ [ searchView model |> el []
166+ , row [ spacing 8, paddingEach { top = 16, bottom = 16, left = 0, right = 0 } ]
167+ [ text "Sources: "
168+ , model.engines
169+ |> List.filter (\( _, state ) -> state /= Failed)
170+ |> List.map
171+ (\( name, state ) ->
172+ text ("%" ++ name)
173+ |> el
174+ (Font.bold
175+ :: (if Set.isEmpty model.selectedEngines then
176+ []
180177
181− else
182− [ Font.color (rgb 0.8 0.8 0.8)
183− ]
184− )
185− ++ (case state of
186− Loading ->
187− [ Html.Attributes.class "shimmer" |> htmlAttribute
178+ else if Set.member name model.selectedEngines then
179+ []
180+
181+ else
182+ [ Font.color (rgb 0.8 0.8 0.8)
188183 ]
184+ )
185+ ++ (case state of
186+ Loading ->
187+ [ Html.Attributes.class "shimmer" |> htmlAttribute
188+ ]
189189
190− Completed ->
191− [ mouseOver
192− [ Font.color (rgb 0.6 0.6 0.6)
190+ Completed ->
191+ [ mouseOver
192+ [ Font.color (rgb 0.6 0.6 0.6)
193+ ]
194+ , pointer
195+ , Events.onClick (ToggleSearchEngine name)
193196 ]
194− , pointer
195− , Events.onClick (ToggleSearchEngine name)
196− ]
197197
198− Failed ->
199− []
200− )
201− )
202− )
203− |> wrappedRow
204− [ spacing 8
205− , width fill
206− , padding 16
207− ]
198+ Failed ->
199+ []
200+ )
201+ )
202+ )
203+ |> wrappedRow
204+ [ spacing 8
205+ , width fill
206+
207+ -- , padding 16
208+ ]
209+ ]
208210 ]
209211 , Keyed.column [ width (minimum 0 fill), padding 8 ]
210212 (model.searchResults