mirror of
https://codeberg.org/scip/dot-emacs.git
synced 2025-12-17 20:40:58 +01:00
21 lines
471 B
EmacsLisp
21 lines
471 B
EmacsLisp
;; https://github.com/leoliu/ack-el
|
|
|
|
(defun tvd-kill-ack()
|
|
(interactive)
|
|
(let ((kill-buffer-query-functions nil))
|
|
(delete-window)
|
|
(kill-buffer "*ack*")))
|
|
|
|
(defun tvd-hook-kill-ack()
|
|
;; FIXME: still asks!
|
|
(local-set-key (kbd "q") 'tvd-kill-ack))
|
|
|
|
(use-package ack
|
|
:config
|
|
(setq ack-defaults-function 'ack-legacy-defaults)
|
|
(advice-add 'ack-mode :after
|
|
'(lambda ()
|
|
(switch-to-buffer "*ack*"))))
|
|
|
|
(add-hook 'ack-mode-hook 'tvd-hook-kill-ack)
|