diff --git a/src/frontend/Component/PackageSidebar.elm b/src/frontend/Component/PackageSidebar.elm index 534c3f2d..6fbd7c89 100644 --- a/src/frontend/Component/PackageSidebar.elm +++ b/src/frontend/Component/PackageSidebar.elm @@ -192,8 +192,8 @@ viewSearchDict context query searchDict = searchResults = searchDict - |> Dict.map (\_ values -> List.filter (.name >> containsQuery) values) - |> Dict.filter (\key values -> not (List.isEmpty values) || containsQuery key) + |> Dict.map (\key values -> if containsQuery key then values else List.filter (.name >> containsQuery) values) + |> Dict.filter (\_ values -> not (List.isEmpty values)) |> Dict.toList in ul [] (List.map (viewModuleLinks context) searchResults)