(mapconcat
#'shell-quote-argument
(split-string files)
- (concat
- (if (file-remote-p dir) "\\\n")
- " -o " find-name-arg " "))
+ (concat "\\\n" " -o " find-name-arg " "))
" "
(shell-quote-argument ")"))
dir
(concat "*/"
(cdr ignore)))))))
grep-find-ignored-directories
- (if (file-remote-p dir)
- "\\\n -o -path "
- " -o -path "))
+ "\\\n -o -path ")
" "
(shell-quote-argument ")")
" -prune -o "))
(shell-quote-argument
(cdr ignore))))))
grep-find-ignored-files
- (if (file-remote-p dir)
- "\\\n -o -name "
- " -o -name "))
+ "\\\n -o -name ")
" "
(shell-quote-argument ")")
" -prune -o "))))))