#
# Shortens GitHub URLs.
#
# Authors:
#   Sorin Ionescu <sorin.ionescu@gmail.com>
#

# function git-hub-shorten-url {

local url="$1" code="$2"

if [[ "$url" == '-' ]]; then
  read url <&0
fi

if [[ -z "$url" || ! "$url" =~ ^https?:\/\/.*github.com\/ ]]; then
  print "usage: $0 [ url | - ] [code] ; url must be a github.com URL" >&2
  return 1
fi

if (( $+commands[curl] )); then
  print "${${(@M)${(f)"$(curl -s -i 'https://git.io' -F "url=$url" ${(z)code:+ -F "code=$code"})"}:#Location: *}#Location: }"
else
  print "$0: command not found: curl" >&2
  return 1
fi

# }