emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Generalize thing-at-point & region functions

Browse source
This commit is contained in:
Henrik Lissner 2020-01-03 02:39:47 -05:00
parent d426349f21
commit 27bf3c85b5
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
7 changed files with 80 additions and 58 deletions
Download patch file Download diff file Expand all files Collapse all files

6
modules/emacs/vc/autoload/vc.el
View file

@ -8,8 +8,7 @@
If a selection is active, highlight them. Otherwise omits the #L<N> suffix in
the URL."
(interactive)
(if (or (use-region-p)
(ignore-errors (evil-visual-state-p)))
(if (doom-region-active-p)
(browse-at-remote)
(browse-url (browse-at-remote--file-url (buffer-file-name)))))
@ -20,8 +19,7 @@ If a selection is active, highlight them. Otherwise omits the #L<N> suffix in
the URL."
(interactive)
(let ((url
(if (or (use-region-p)
(evil-visual-state-p))
(if (doom-region-active-p)
(browse-at-remote-get-url)
(browse-at-remote--file-url (buffer-file-name)))))
(kill-new url)