bug#4403: 23.1; find-dired: use "find -exec ls -ld {} +" or "find -ls" where available

[Glenn Morris]

trentbuck@gmail.com wrote:

> Recent versions of GNU find support the expressions
>
>     find <query> -exec ls -ld {} +
>
> and
>
>     find <query> -ls
>
> I believe these are also part of recent versions of the POSIX spec.
>
> It would be great if M-x find dired RET automatically used these forms

You can use something like:

(setq find-ls-option
      (let ((help (shell-command-to-string (format "%s --help" find-program))))
        (if (string-match " -ls\\>" help)
            '("-ls" . "-lids")
          (if (string-match "{} \\+" help)
              '("-exec ls -ld {} +" . "-ld")
            '("-exec ls -ld {} \\;" . "-ld")))))

The -ls version changes the output format.

> It would also mean that the output would line up better

Surely dired already takes care of the alignment?