Add geef_commit:tree()

src/geef_commit.erl

@@ -1,5 +1,5 @@
 -module(geef_commit).
--export([tree_id/1]).
+-export([tree_id/1, tree/1]).
 
 -include("geef_records.hrl").
 
@@ -7,3 +7,11 @@
 tree_id(#object{type=commit,handle=Handle}) ->
     Oid = geef:commit_tree_id(Handle),
     #oid{oid=Oid}.
+
+tree(Obj = #object{type=commit,handle=Handle}) ->
+    case geef:commit_tree(Handle) of
+	{ok, Type, Handle} ->
+	    {ok, #object{type=Type, handle=Handle}};
+	Other ->
+	    Other
+    end.