From f8a0600ebafd4dd03db5f7b4e254e30cd0002d27 Mon Sep 17 00:00:00 2001 From: Martin Polden Date: Fri, 26 Feb 2016 15:41:16 +0100 Subject: Move grep config to separate file --- lisp/init-grep.el | 31 +++++++++++++++++++++++++++++++ 1 file changed, 31 insertions(+) create mode 100644 lisp/init-grep.el (limited to 'lisp/init-grep.el') diff --git a/lisp/init-grep.el b/lisp/init-grep.el new file mode 100644 index 0000000..84ea710 --- /dev/null +++ b/lisp/init-grep.el @@ -0,0 +1,31 @@ +(use-package grep + :ensure nil ;; package is bundled with emacs + + :bind (:map grep-mode-map + ;; make C-o and o behave as in dired + ("o" . grep-visit-buffer-other-window) + ("C-o" . grep-visit-buffer-other-window-noselect) + ;; n and p changes line as in ag-mode + ("n" . compilation-next-error) + ("p" . compilation-previous-error)) + + :config + (defun grep-visit-buffer-other-window (&optional event noselect) + "Visit grep result in another window." + (interactive) + (let ((current-window (selected-window))) + (compile-goto-error event) + (when noselect + (select-window current-window)))) + + (defun grep-visit-buffer-other-window-noselect (&optional event) + "Visit grep result in another window, but don't select it." + (interactive) + (grep-visit-buffer-other-window event t)) + + (add-hook 'grep-mode-hook + (lambda () + ;; wrap lines + (setq-local truncate-lines nil)))) + +(provide 'init-grep) -- cgit v1.2.3