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

Remap xref-pop-marker-stack -> better-jumper

Browse source 
Better to have only one jumplist system.

Also remaps xref-find-* commands to +lookup commands earlier in the
startup process.
This commit is contained in:
Henrik Lissner 2019-07-13 15:46:15 +02:00
parent 57a5137b4b
commit 0b28480a21
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
2 changed files with 6 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

1
core/core-editor.el
View file

@ -197,6 +197,7 @@ savehist file."
:init :init
(global-set-key [remap evil-jump-forward] #'better-jumper-jump-forward) (global-set-key [remap evil-jump-forward] #'better-jumper-jump-forward)
(global-set-key [remap evil-jump-backward] #'better-jumper-jump-backward) (global-set-key [remap evil-jump-backward] #'better-jumper-jump-backward)
(global-set-key [remap xref-pop-marker-stack] #'better-jumper-jump-backward)
:config :config
(better-jumper-mode +1) (better-jumper-mode +1)
(add-hook 'better-jumper-post-jump-hook #'recenter) (add-hook 'better-jumper-post-jump-hook #'recenter)

10
modules/tools/lookup/config.el
View file

@ -98,6 +98,11 @@ this list.")
;; ;;
;;; xref ;;; xref
;; The lookup commands are superior, and will consult xref if there are no
;; better backends available.
(global-set-key [remap xref-find-definitions] #'+lookup/definition)
(global-set-key [remap xref-find-references] #'+lookup/references)
(after! xref (after! xref
;; We already have `projectile-find-tag' and `evil-jump-to-tag', no need for ;; We already have `projectile-find-tag' and `evil-jump-to-tag', no need for
;; xref to be one too. ;; xref to be one too.
@ -108,11 +113,6 @@ this list.")
(funcall orig-fn))) (funcall orig-fn)))
(advice-add #'projectile-find-tag :around #'+lookup*projectile-find-tag) (advice-add #'projectile-find-tag :around #'+lookup*projectile-find-tag)
;; The lookup commands are superior, and will consult xref if there are no
;; better backends available.
(global-set-key [remap xref-find-definitions] #'+lookup/definition)
(global-set-key [remap xref-find-references] #'+lookup/references)
;; Use `better-jumper' instead of xref's marker stack ;; Use `better-jumper' instead of xref's marker stack
(advice-add #'xref-push-marker-stack :around #'doom*set-jump) (advice-add #'xref-push-marker-stack :around #'doom*set-jump)