commit b37fdf43803e37625236e1764ecc8a0de4bc60ec parent 1b9ae1f5935349634565b45313e9906628fb2fa8 Author: William Casarin <jb55@jb55.com> Date: Thu, 12 Nov 2020 12:26:04 -0800 emacs: cd-gh for cding to github projs Diffstat:
| M | dotfiles/.spacemacs | | | 8 | +++++++- |
1 file changed, 7 insertions(+), 1 deletion(-)
diff --git a/dotfiles/.spacemacs b/dotfiles/.spacemacs @@ -325,10 +325,16 @@ If you are unsure, try setting them in `dotspacemacs/user-config' first." (add-hook 'message-send-hook 'notmuch-always-bcc-sender) ;; (load "~/src/elisp/overlays/overlays.el") + (defun cd-gh (&optional repo) + (interactive) + (let ((rep (or repo (read-string "cd github owner/repo: ")))) + (when (not (eq 0 (length rep))) + (cd (concat "/home/jb55/dev/github/" rep))))) + (defun cd-repo () (interactive) (let ((repo (notmuch-repo-from-message))) - (cd (concat "/home/jb55/dev/github/" repo)))) + (cd-gh repo))) (defun colorize-compilation-buffer () (toggle-read-only)