Create a copy of the iterator before turning it into a stream

A functional language shouldn't modify the iterator, but instead keep
advancing. As we can't stop in any particular point, we still just use
a stream.

src/geef_records.hrl

@@ -13,7 +13,7 @@
 -record(geef_request, {service :: atom(), path :: binary(), host :: binary()}).
 -record(geef_tree_entry, {mode, type, id, name}).
 -record(geef_signature, {name :: iolist(), email :: iolist(), time :: geef_time()}).
--record(geef_iterator, {type :: atom(), handle}).
+-record(geef_iterator, {type :: atom(), repo :: pid(), regexp :: iolist(), handle}).
 
 -type geef_reference() :: #geef_reference{name :: binary(), target :: binary() | geef_oid()}.
 -type geef_oid() :: #geef_oid{oid :: binary()}.

src/geef_ref.erl

@@ -44,7 +44,7 @@ lookup(Repo, Refname) ->
 iterator(Repo, Regexp) ->
     case geef_repo:iterator(Repo, Regexp) of
 	{ok, Handle} ->
-	    {ok, #geef_iterator{type=ref, handle=Handle}};
+	    {ok, #geef_iterator{type=ref, repo=Repo, regexp=Regexp, handle=Handle}};
 	Other ->
 	    Other
     end.