Clean up --mk
This commit is contained in:
parent
762ba05da0
commit
8642e4e0ad
1 changed files with 3 additions and 18 deletions
|
@ -57,24 +57,9 @@
|
|||
(interactive "nTransparency Value 0 - 100 opaque: ")
|
||||
(set-frame-parameter (selected-frame) 'alpha value))
|
||||
|
||||
(defun jnf/magit-browse-pull-request ()
|
||||
"In `magit-log-mode', open the associated pull request at point."
|
||||
(interactive)
|
||||
(let* ((remote-url
|
||||
(car
|
||||
(git-link--exec "remote" "get-url"
|
||||
(format "%s" (magit-get-current-remote)))))
|
||||
(beg (line-beginning-position))
|
||||
(end (line-end-position))
|
||||
(region (buffer-substring-no-properties beg end)))
|
||||
(save-match-data
|
||||
(and (string-match "(\\#\\([0-9]+\\))$" region)
|
||||
(browse-url-default-macosx-browser
|
||||
(concat
|
||||
(s-replace ".git" "" remote-url)
|
||||
"/pull/"
|
||||
(match-string 1 region)))))))
|
||||
|
||||
;; (if (display-graphic-p)
|
||||
;; (add-hook 'after-init-hook (lambda () (org-agenda-list) (me/split-h3)))
|
||||
;; (org-agenda-list))
|
||||
|
||||
(defvar mirror-website
|
||||
"Locally mirror a website using `wget -mkEpnp <ur>`")
|
||||
|
|
Loading…
Add table
Reference in a new issue