aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/dired-aux.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el
index 4d7abd1ef6f..fb1ad6266d6 100644
--- a/lisp/dired-aux.el
+++ b/lisp/dired-aux.el
@@ -2876,7 +2876,7 @@ Intended to be added to `isearch-mode-hook'."
2876 (dired-isearch-filenames-mode -1) 2876 (dired-isearch-filenames-mode -1)
2877 (remove-hook 'isearch-mode-end-hook #'dired-isearch-filenames-end t) 2877 (remove-hook 'isearch-mode-end-hook #'dired-isearch-filenames-end t)
2878 (unless isearch-suspended 2878 (unless isearch-suspended
2879 (custom-reevaluate-setting 'dired-isearch-filenames))) 2879 (kill-local-variable 'dired-isearch-filenames)))
2880 2880
2881(defun dired-isearch-filter-filenames (beg end) 2881(defun dired-isearch-filter-filenames (beg end)
2882 "Test whether some part of the current search match is inside a file name. 2882 "Test whether some part of the current search match is inside a file name.
@@ -2889,14 +2889,14 @@ is part of a file name (i.e., has the text property `dired-filename')."
2889(defun dired-isearch-filenames () 2889(defun dired-isearch-filenames ()
2890 "Search for a string using Isearch only in file names in the Dired buffer." 2890 "Search for a string using Isearch only in file names in the Dired buffer."
2891 (interactive) 2891 (interactive)
2892 (setq dired-isearch-filenames t) 2892 (set (make-local-variable 'dired-isearch-filenames) t)
2893 (isearch-forward nil t)) 2893 (isearch-forward nil t))
2894 2894
2895;;;###autoload 2895;;;###autoload
2896(defun dired-isearch-filenames-regexp () 2896(defun dired-isearch-filenames-regexp ()
2897 "Search for a regexp using Isearch only in file names in the Dired buffer." 2897 "Search for a regexp using Isearch only in file names in the Dired buffer."
2898 (interactive) 2898 (interactive)
2899 (setq dired-isearch-filenames t) 2899 (set (make-local-variable 'dired-isearch-filenames) t)
2900 (isearch-forward-regexp nil t)) 2900 (isearch-forward-regexp nil t))
2901 2901
2902 2902