diff options
| author | Adelyn Breedlove <[email protected]> | 2019-03-06 10:41:18 -0700 |
|---|---|---|
| committer | Adelyn Breedlove <[email protected]> | 2019-03-06 10:41:18 -0700 |
| commit | f68838306a66cb358688f4976c5770db89293db4 (patch) | |
| tree | bdd6388df7f0fbf9c7512485e91da83a7ec47821 /lib/http | |
| parent | Close frames should log code now (diff) | |
| download | disml-f68838306a66cb358688f4976c5770db89293db4.tar.xz disml-f68838306a66cb358688f4976c5770db89293db4.zip | |
Unfuck the cache
Diffstat (limited to 'lib/http')
| -rw-r--r-- | lib/http/http.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/http/http.ml b/lib/http/http.ml index 5e75cb4..e5b8b20 100644 --- a/lib/http/http.ml +++ b/lib/http/http.ml @@ -57,6 +57,7 @@ module Base = struct >>= process_response path
in if limit.remaining > 0 then process ()
else
+ (* TODO use Date header instead of unix time *)
let time = float_of_int limit.reset -. Unix.time () in
Logs_lwt.info (fun m -> m
"Rate-limiting [Route: %s] [Duration: %f s]"
|