summaryrefslogtreecommitdiff
path: root/src/storage.erl
diff options
context:
space:
mode:
Diffstat (limited to 'src/storage.erl')
-rw-r--r--src/storage.erl13
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.