diff --git a/core/core-editor.el b/core/core-editor.el index cb1cd9142..62bad4c75 100644 --- a/core/core-editor.el +++ b/core/core-editor.el @@ -271,7 +271,7 @@ (use-package wgrep :commands (wgrep-setup wgrep-change-to-wgrep-mode) :config - (def-popup! "^\\*ivy-occur.+" :align below :size 25 :select t :regexp t) + (def-popup! "^\\*ivy-occur counsel-ag" :align below :size 25 :select t :regexp t) (setq wgrep-auto-save-buffer t) (advice-add 'wgrep-abort-changes :after 'doom/popup-close) (advice-add 'wgrep-finish-edit :after 'doom/popup-close)) diff --git a/core/core-ivy.el b/core/core-ivy.el index 3325ccf7d..7c5ddc113 100644 --- a/core/core-ivy.el +++ b/core/core-ivy.el @@ -32,7 +32,7 @@ (ivy-wgrep-change-to-wgrep-mode))) (advice-add 'counsel-ag-function :override 'doom*counsel-ag-function) - (define-key counsel-ag-map [backtab] 'ivy-occur) + (define-key counsel-ag-map [backtab] 'doom/counsel-ag-occur) (setq counsel-find-file-ignore-regexp "\\(?:^[#.]\\)\\|\\(?:[#~]$\\)\\|\\(?:^Icon?\\)")) diff --git a/core/defuns/defuns-ivy.el b/core/defuns/defuns-ivy.el index 5fb9daeb7..d6e055bae 100644 --- a/core/defuns/defuns-ivy.el +++ b/core/defuns/defuns-ivy.el @@ -125,5 +125,12 @@ interferes with my custom :ag ex command `doom:ivy-ag-search'." (counsel--async-command ag-cmd)) nil))) +;;;###autoload +(defun doom/counsel-ag-occur () + "Invoke the search+replace wgrep buffer on the current ag search results." + (interactive) + (require 'wgrep) + (call-interactively 'ivy-occur)) + (provide 'defuns-ivy) ;;; defuns-ivy.el ends here