Fix geef_ref:lookup/2

Make use of the repo server intead of accepting a handle

src/geef_ref.erl

@@ -9,9 +9,9 @@ new(Handle) ->
     Type = geef:reference_type(Handle),
     #ref{handle=Handle, type=Type}.
 
--spec lookup(repo(), iolist()) -> {ok, ref()} | {error, term()}.
+-spec lookup(pid(), iolist()) -> {ok, ref()} | {error, term()}.
-lookup(#repo{handle=Handle}, Refname) ->
+lookup(Repo, Refname) ->
-    case geef:reference_lookup(Handle, Refname) of
+    case geef_repo:lookup_reference(Repo, Refname) of
 	{ok, Ref} ->
 	    {ok, new(Ref)};
 	Other ->

src/geef_repo.erl

@@ -16,7 +16,7 @@
 
 %% API
 -export([open/1, init/2, path/1, workdir/1, odb/1, is_bare/1, references/1, discover/1,
-	 lookup_object/2, revwalk/1, stop/1]).
+	 lookup_object/2, lookup_reference/2, revwalk/1, stop/1]).
 
 -include("geef_records.hrl").
 -record(state, {handle}).
@@ -81,6 +81,10 @@ references(Pid) ->
 lookup_object(Pid, Oid) ->
     gen_server:call(Pid, {lookup_object, Oid}).
 
+%% @private
+lookup_reference(Pid, Name) ->
+    gen_server:call(Pid, {lookup_reference, Name}).
+
 %% @doc Create a revision walker for the given repository.
 revwalk(Pid) ->
     gen_server:call(Pid, revwalk).
@@ -115,6 +119,9 @@ handle_call(refs, _From, State = #state{handle=Handle}) ->
 handle_call({lookup_object, Oid}, _From, State = #state{handle=Handle}) ->
     Reply = geef:object_lookup(Handle, Oid),
     {reply, Reply, State};
+handle_call({lookup_reference, Name}, _From, State = #state{handle=Handle}) ->
+    Reply = geef:reference_lookup(Handle, Name),
+    {reply, Reply, State};
 handle_call(stop, _From, State) ->
     {stop, normal, ok, State};
 handle_call(revwalk, _From, State = #state{handle=Handle}) ->