diff options
Diffstat (limited to 'src/storage.erl')
-rw-r--r-- | src/storage.erl | 13 |
1 files changed, 5 insertions, 8 deletions
diff --git a/src/storage.erl b/src/storage.erl index e09acdb..8136308 100644 --- a/src/storage.erl +++ b/src/storage.erl @@ -43,14 +43,11 @@ request(get, "ct/storage/fetchnewentries", _Input) -> {entries, Entries}]}). fetchnewhashes(Index) -> - lists:reverse(fetchnewhashes(Index, [])). - -fetchnewhashes(Index, Acc) -> - case index:get(newentries_path(), Index) of - noentry -> - Acc; - Entry -> - fetchnewhashes(Index + 1, [Entry | Acc]) + case index:indexsize(newentries_path()) of + 0 -> + []; + Size -> + index:getrange(newentries_path(), Index, Size - 1) end. %% Private functions. |