Update 9
This commit is contained in:
@@ -31,9 +31,7 @@ searchFeed query =
|
|||||||
|
|
||||||
responseDecoder : Decoder (List SearchResult.Model)
|
responseDecoder : Decoder (List SearchResult.Model)
|
||||||
responseDecoder =
|
responseDecoder =
|
||||||
-- TODO use SearchResult's decoder
|
"items" := Json.Decode.list SearchResult.decoder
|
||||||
--Json.Decode.succeed []
|
|
||||||
("items" := Json.Decode.list SearchResult.decoder)
|
|
||||||
|
|
||||||
|
|
||||||
type alias Model =
|
type alias Model =
|
||||||
|
|||||||
@@ -32,7 +32,7 @@ searchFeed query =
|
|||||||
|
|
||||||
responseDecoder : Decoder (List SearchResult.Model)
|
responseDecoder : Decoder (List SearchResult.Model)
|
||||||
responseDecoder =
|
responseDecoder =
|
||||||
-- TODO use SearchResult's decoder
|
-- TODO make use of SearchResult's decoder
|
||||||
Json.Decode.succeed []
|
Json.Decode.succeed []
|
||||||
|
|
||||||
|
|
||||||
@@ -71,7 +71,7 @@ viewSearchResults address results =
|
|||||||
results
|
results
|
||||||
|> Dict.values
|
|> Dict.values
|
||||||
|> List.sortBy (.stars >> negate)
|
|> List.sortBy (.stars >> negate)
|
||||||
|> List.map (SearchResult.view address)
|
|> List.map (\_ -> div [] [ text "TODO replace this line view logic from SearchResult" ])
|
||||||
|
|
||||||
|
|
||||||
onInput address wrap =
|
onInput address wrap =
|
||||||
|
|||||||
Reference in New Issue
Block a user