Check if branch is local

is_local(branch)

Arguments

branch

The branch object to check if it's local

Value

TRUE if branch is local, else FALSE.

Examples

if (FALSE) { ## Initialize repositories path_bare <- tempfile(pattern="git2r-") path_repo <- tempfile(pattern="git2r-") dir.create(path_bare) dir.create(path_repo) repo_bare <- init(path_bare, bare = TRUE) repo <- clone(path_bare, path_repo) ## Config first user and commit a file config(repo, user.name = "Alice", user.email = "[email protected]") ## Write to a file and commit lines <- "Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do" writeLines(lines, file.path(path_repo, "example.txt")) add(repo, "example.txt") commit(repo, "First commit message") ## Push commits from repository to bare repository ## Adds an upstream tracking branch to branch 'master' push(repo, "origin", "refs/heads/master") ## List branches branches(repo) ## Check if first branch is_local is_local(branches(repo)[[1]]) ## Check if second branch is_local is_local(branches(repo)[[2]]) }