ctucx.git: nimgit

repository.nim: new proc isHeadDetached, cleanup

diff --git a/nimgit/repository.nim b/nimgit/repository.nim
@@ -1,13 +1,16 @@
 import nimgit2
 import types, free
 
-proc openGitRepository* (path: string): GitRepository =
-    let error = git_repository_open(addr result, path)
+proc openGitRepository* (path: string): GitRepository = 
+    var repository: GitRepository
+    let error = git_repository_open(addr repository, path)
 
     if error != 0:
-        free(result)
+        free(repository)
         raise newException(CatchableError, "Cannot open repository: " & $error.getResultCode)
 
+    result = repository
+
 proc getHead* (repo: GitRepository): GitReference = 
     let error = git_repository_head(addr result, repo)
 

@@ -15,7 +18,8 @@ proc getHead* (repo: GitRepository): GitReference =
         free(result)
         raise newException(CatchableError, "Cannot get HEAD: " & $error.getResultCode)
 
-proc getPath* (repo: GitRepository): string =
-    return $git_repository_path(repo)
+proc isHeadDetached* (repo: GitRepository): bool = cast[bool](git_repository_head_detached(repo))
+
+proc getPath* (repo: GitRepository): string = $git_repository_path(repo)
 
 proc `$`* (repo: GitRepository): string = repo.getPath() 
\ No newline at end of file