Have geef_odb:exists take an oid properly

src/geef_odb.erl

@@ -1,11 +1,18 @@
 -module(geef_odb).
+
+-ifdef(TEST).
+-include_lib("eunit/include/eunit.hrl").
+-endif.
+
 -export([exists/2, write/3]).
 
 -include("geef_records.hrl").
 
--spec exists(odb(), string()) -> boolean().
-exists(#odb{handle=Handle}, Sha) ->
-    geef:odb_object_exists(Handle, Sha).
+-spec exists(odb(), oid() | iolist()) -> boolean().
+exists(#odb{handle=Handle}, #oid{oid=Oid}) ->
+    geef:odb_object_exists(Handle, Oid);
+exists(Odb = #odb{}, Sha) ->
+    exists(Odb, geef_oid:parse(Sha)).
 
 -spec write(odb(), iolist(), atom()) -> {ok, oid()} | {error, term}.
 write(#odb{handle=Handle}, Contents, Type) ->
@@ -15,3 +22,13 @@ write(#odb{handle=Handle}, Contents, Type) ->
 	Other ->
 	    Other
     end.
+
+-ifdef(TEST).
+
+exists_test() ->
+    {ok, Repo} = geef_repo:open(".."),
+    {ok, Odb} = geef_repo:odb(Repo),
+    ?assert(exists(Odb, "80d5c15a040c93a4f98f4496a05ebf30cdd58650")),
+    ?assert(exists(Odb, geef_oid:parse("80d5c15a040c93a4f98f4496a05ebf30cdd58650"))).
+
+-endif.