Bump :emacs vc

rmuslimov/browse-at-remote@aeee6bf -> rmuslimov/browse-at-remote@771a307

Closes #2680
This commit is contained in:
Henrik Lissner 2020-03-08 13:06:04 -04:00
parent 83072d5440
commit a25dea91d8
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
5 changed files with 13 additions and 24 deletions

View file

@ -1,19 +1,5 @@
;;; emacs/vc/autoload/vc.el -*- lexical-binding: t; -*-
(autoload 'browse-at-remote-get-url "browse-at-remote")
(autoload 'browse-at-remote--file-url "browse-at-remote")
;;;###autoload
(defun +vc/browse-at-remote-kill-file-or-region ()
"Copy the current file's remote URL to your clipboard.
If a selection is active, highlight them. Otherwise omits the #L<N> suffix in
the URL."
(interactive)
(let ((url (browse-at-remote-get-url)))
(kill-new url)
(message "Copied to clipboard: %S" url)))
(defun +vc--remote-homepage ()
(or (let ((url (browse-at-remote--remote-ref)))
(cdr (browse-at-remote--get-url-from-remote (car url))))