Make score nullable

This resolves #30
2025-01-07 15:22:21 +03:00 · 2015-05-13 16:37:46 -07:00 · 2015-05-13 16:37:46 -07:00 · 3bef0d9913
commit 3bef0d9913
parent 3939fc6ae1
1 changed files with 1 additions and 1 deletions
--- a/src/Database/Bloodhound/Types.hs
+++ b/src/Database/Bloodhound/Types.hs
@ -1118,7 +1118,7 @@ data SearchResult a =
               , searchHits   :: SearchHits a
               , aggregations :: Maybe AggregationResults } deriving (Eq, Show)

-type Score = Double
+type Score = Maybe Double

 data SearchHits a =
  SearchHits { hitsTotal :: Int