Filter on buckets only when there is some bucket selected (#289)

otherwise the query is malformed
2021-02-07 19:24:00 +01:00 · 2021-02-07 19:24:00 +01:00 · 7c89b2349c
parent cfb5e540b9
commit 7c89b2349c
1 changed files with 9 additions and 3 deletions
--- a/src/Search.elm
+++ b/src/Search.elm
@ -1095,9 +1095,15 @@ makeRequestBody query from sizeRaw sort type_ sortField otherSortFields bucketsF
                      , Json.Encode.object
                            [ ( "filter"
                              , Json.Encode.list Json.Encode.object
-                                    [ filterByType type_
-                                    , filterByBuckets
-                                    ]
+                                    (List.append
+                                        [ filterByType type_ ]
+                                        (if List.isEmpty filterByBuckets then
+                                            []
+
+                                         else
+                                            [ filterByBuckets ]
+                                        )
+                                    )
                              )
                            , ( "must"
                              , Json.Encode.list Json.Encode.object