Filter out empty tag categories in search menu

Fixes: #1402
This commit is contained in:
eikek 2022-02-24 21:41:04 +01:00
parent 23632b793b
commit 3545426582

View File

@ -106,7 +106,7 @@ initAvailable allTags allCats model =
cats =
List.sortBy (.count >> negate) allCats
|> List.map (.name >> Maybe.withDefault "")
|> List.filterMap .name
in
{ model
| availableTags = tags