summaryrefslogtreecommitdiff
path: root/lisp/dired.el
diff options
context:
space:
mode:
authorEduard Wiebe <usenet@pusto.de>2012-01-27 13:40:44 -0800
committerGlenn Morris <rgm@gnu.org>2012-01-27 13:40:44 -0800
commitfc4f7a233ec0e3bf4366f784e14b53e92bcc0241 (patch)
tree1d16082ebe09c084bf61f5247a3afcacc9110e9d /lisp/dired.el
parent1b5e5b0cb42fa42e6d3240ad005be46fb1b0fd51 (diff)
downloademacs-fc4f7a233ec0e3bf4366f784e14b53e92bcc0241.tar.gz
* dired.el (dired-mark-files-regexp): Include any subdirectory components.
Fixes: debbugs:10445
Diffstat (limited to 'lisp/dired.el')
-rw-r--r--lisp/dired.el4
1 files changed, 2 insertions, 2 deletions
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)