list-branch.cr

set = Set.new ["HEAD"]
process = Process.new "git", args: [
  "for-each-ref",
  "--count=100",
  "--sort=-committerdate",
  "refs/",
  "--format=%(refname:short)",
  "--no-merged=HEAD"
], output: Process::Redirect::Pipe

process.output.each_line do |l|
  branch_name = l.strip.sub /^origin\//, ""
  puts branch_name unless set.includes? branch_name
  set << branch_name
end

exit process.wait.exit_code