From d4694fe5c169044ca78803359162484fec0f39d7 Mon Sep 17 00:00:00 2001 From: jvoigtlaender Date: Sun, 29 Nov 2015 15:55:32 +0100 Subject: [PATCH] show all entries for matched modules in search --- src/frontend/Component/PackageSidebar.elm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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)