Generate GitHub URLs from code selections

git-link-yank.kak

def git-link-yank %{
  nop %sh{
    url="$(git remote get-url origin | sed -e 's/:/\//' -e 's/git@/https:\/\//' -e 's/\.git//')/blob"
    branch="/$(git status -b --porcelain=v2 | grep branch.oid | cut -d ' ' -f 3)"
    top=$(git rev-parse --show-toplevel | sed 's/\//\\\//g')
    path=$(echo -n "$kak_buffile" | sed "s/$top//")
    line1="#L$(echo $kak_selection_desc | sed 's/\..*$//')"
    line2="-L$(echo $kak_selection_desc | cut -d ',' -f 2 | sed 's/\..*$//')"
    printf "%s%s%s%s" "$url" "$branch" "$path" "$line1" "$line2" | xsel -b
  }
}
map global normal <c-y> ': git-link-yank<ret>'