From 16cba5acd05093c66ab1432b40d40605c1098407 Mon Sep 17 00:00:00 2001 From: Adelyn Breelove Date: Tue, 29 Jan 2019 10:01:35 -0700 Subject: Add client options --- lib/sharder.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lib/sharder.ml') diff --git a/lib/sharder.ml b/lib/sharder.ml index f98ee8f..65d137e 100644 --- a/lib/sharder.ml +++ b/lib/sharder.ml @@ -127,8 +127,8 @@ module Shard = struct ("$device", `String "dis.ml"); ("$browser", `String "dis.ml") ]); - ("compress", `Bool false); (* TODO add compression handling*) - ("large_threshold", `Int 250); + ("compress", `Bool !Client_options.compress); (* TODO add compression handling*) + ("large_threshold", `Int !Client_options.large_threshold); ("shard", `List shards); ] in push_frame ~payload ~ev:IDENTIFY shard -- cgit v1.2.3