Add a zsh function to create PR of current branch

.emacs.d/custom/init.el

@@ -474,7 +474,7 @@ that was stored with ska-point-to-register."
 
 (add-hook 'js2-mode-hook #'js2-refactor-mode)
 (js2r-add-keybindings-with-prefix "C-c C-r")
-(define-key js2-mode-map (kbd "C-k") #'js2r-kill)
+;; (define-key js2-mode-map (kbd "C-k") #'js2r-kill)
 
 ;; js-mode (which js2 is based on) binds "M-." which conflicts with xref, so
 ;; unbind it.

.zshrc

@@ -153,3 +153,11 @@ function enable_nvmrc() {
     export NVM_DIR="$HOME/.nvm"
     . "/usr/local/opt/nvm/nvm.sh"
 }
+
+function pr() {
+  ref=$(git symbolic-ref HEAD 2> /dev/null) || return
+  branch=${ref#refs/heads/}
+  remote=$(git config --get remote.origin.url)
+  [[ $remote =~ 'git@(.*):(.*).git' ]] && domain=$match[1] && repo=$match[2]
+  open "https://$domain/$repo/compare/$branch?expand=1"
+}