diff options
Diffstat (limited to 'lisp/find-dired.el')
| -rw-r--r-- | lisp/find-dired.el | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lisp/find-dired.el b/lisp/find-dired.el index 5f5a25abf8b..41581cc7900 100644 --- a/lisp/find-dired.el +++ b/lisp/find-dired.el @@ -50,10 +50,13 @@ than the latter." :group 'find-dired :type 'string) +(defvar find-gnu-find-p + (eq 0 (ignore-errors + (process-file find-program nil nil nil null-device "--version"))) + "Non-nil if `find-program' is a GNU Find, nil otherwise.") + (defvar find-ls-option-default-ls - (cons "-ls" (if (memq system-type '(berkeley-unix darwin)) - "-dgils" - "-dilsb"))) + (cons "-ls" (if find-gnu-find-p "-dilsb" "-dgils"))) (defvar find-ls-option-default-exec (cons (format "-exec ls -ld {} %s" find-exec-terminator) "-ld")) |