Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Up the "All" threshold to 5000 columns

  • Loading branch information...
commit 8d21705c662a9cad90b9e5b2257491580b79d8c7 1 parent ec1c368
@ozataman ozataman authored
Showing with 3 additions and 1 deletion.
  1. +3 −1 src/Database/Cassandra/Types.hs
View
4 src/Database/Cassandra/Types.hs
@@ -62,10 +62,12 @@ data Selector =
deriving (Show)
+
+-------------------------------------------------------------------------------
mkPredicate :: Selector -> C.SlicePredicate
mkPredicate s =
let
- allRange = C.SliceRange (Just "") (Just "") (Just False) (Just 100)
+ allRange = C.SliceRange (Just "") (Just "") (Just False) (Just 5000)
in case s of
All -> C.SlicePredicate Nothing (Just allRange)
ColNames ks -> C.SlicePredicate (Just ks) Nothing

0 comments on commit 8d21705

Please sign in to comment.
Something went wrong with that request. Please try again.