diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2020-01-21 09:16:25 -0500 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2020-01-21 09:16:25 -0500 |
| commit | c1b6cf6757fbd00cf6e8cae23e1670b9ff794811 (patch) | |
| tree | 0fb696878e2f766f6117e7eac359659f0e9d4b97 /lisp/dired.el | |
| parent | ee1ccb428e7560fa973b9da3918a097f864298b3 (diff) | |
| download | emacs-c1b6cf6757fbd00cf6e8cae23e1670b9ff794811.tar.gz | |
* lisp/progmodes/grep.el (grep-read-files-function): New var.
Also remove redundant :groups while we're here.
(grep-read-files): Use it instead of a major-mode symbol property.
(grep-read-files--default): New function.
* lisp/dired.el (dired-mode): Use `grep-read-files-function`.
Diffstat (limited to 'lisp/dired.el')
| -rw-r--r-- | lisp/dired.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/dired.el b/lisp/dired.el index 98e3be72278..0e0b25eac8c 100644 --- a/lisp/dired.el +++ b/lisp/dired.el @@ -851,7 +851,6 @@ If a directory or nothing is found at point, return nil." (if (and file-name (not (file-directory-p file-name))) file-name))) -(put 'dired-mode 'grep-read-files 'dired-grep-read-files) ;;;###autoload (define-key ctl-x-map "d" 'dired) ;;;###autoload @@ -2244,6 +2243,7 @@ Keybindings: (setq-local font-lock-defaults '(dired-font-lock-keywords t nil nil beginning-of-line)) (setq-local desktop-save-buffer 'dired-desktop-buffer-misc-data) + (setq-local grep-read-files-function #'dired-grep-read-files) (setq dired-switches-alist nil) (hack-dir-local-variables-non-file-buffer) ; before sorting (dired-sort-other dired-actual-switches t) |