diff --git a/src/geef.erl b/src/geef.erl index a3d386d..1162f17 100644 --- a/src/geef.erl +++ b/src/geef.erl @@ -45,7 +45,8 @@ repository(Path) -> case repository_open(Path) of {ok, Handle} -> repository:new(Handle); - other -> other + Other -> + Other end. odb_object_exists(_Val, _Val) -> diff --git a/src/reference.erl b/src/reference.erl index e0a6b4c..04fc5c5 100644 --- a/src/reference.erl +++ b/src/reference.erl @@ -5,5 +5,6 @@ resolve() -> case geef:reference_resolve(Handle) of {ok, Ref} -> reference:new(Ref); - other -> other + Other -> + Other end. diff --git a/src/repository.erl b/src/repository.erl index 1510859..61d6b65 100644 --- a/src/repository.erl +++ b/src/repository.erl @@ -1,15 +1,19 @@ -module(repository, [Handle]). -export([path/0, workdir/0, bare/0, references/0, odb/0, lookup/1]). +-spec path() -> binary(). path() -> geef:repository_get_path(Handle). +-spec workdir() -> binary(). workdir() -> geef:repository_get_workdir(Handle). +-spec bare() -> boolean(). bare() -> geef:repository_is_bare(Handle). +-spec references() -> [binary()] | []. references() -> geef:reference_list(Handle). @@ -17,14 +21,14 @@ odb() -> case geef:repository_get_odb(Handle) of {ok, Odb} -> odb:new(Odb); - other -> - other + Other -> + Other end. lookup(Refname) -> - case geef:repositiory_lookup_reference(Handle, Refname) of + case geef:reference_lookup(Handle, Refname) of {ok, Ref} -> reference:new(Ref); - other -> - other + Other -> + Other end.