From fc4f7a233ec0e3bf4366f784e14b53e92bcc0241 Mon Sep 17 00:00:00 2001 From: Eduard Wiebe Date: Fri, 27 Jan 2012 13:40:44 -0800 Subject: * dired.el (dired-mark-files-regexp): Include any subdirectory components. Fixes: debbugs:10445 --- lisp/dired.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lisp/dired.el') diff --git a/lisp/dired.el b/lisp/dired.el index b39e6e7c93c..3962ef14aa4 100644 --- a/lisp/dired.el +++ b/lisp/dired.el @@ -3168,8 +3168,8 @@ object files--just `.o' will mark more than you might think." (dired-mark-if (and (not (looking-at dired-re-dot)) (not (eolp)) ; empty line - (let ((fn (dired-get-filename nil t))) - (and fn (string-match regexp (file-name-nondirectory fn))))) + (let ((fn (dired-get-filename t t))) + (and fn (string-match regexp fn)))) "matching file"))) (defun dired-mark-files-containing-regexp (regexp &optional marker-char) -- cgit v1.2.1