Give roots precedence over base directories in path searching

[Vin Shelton]

On 8/7/07, Michael Sperber <sperber at informatik.uni-tuebingen.de> wrote:
>
> "Stephen J. Turnbull" <stephen at xemacs.org> writes:
>
> > `paths-find-module-directory' uses `paths-find-architecture-directory'.
> > Unfortunately, `paths-find-architecture-directory' does a breadth-
> > first search across roots, looking for architecture-specific
> > directories first, so it will definitely find
> > "/usr/local/xemacs/xemacs-21.5-b27/powerpc-apple-darwin8.8.0/modules"
> > before it finds "~/Software/XEmacs/git-staging/+build/modules" even
> > though I'm running in-place.
>
> The attached patch fixes this.  Will commit Thursday if nobody objects.
>
> 2007-08-07  Mike Sperber  <mike at xemacs.org>
>
>         * setup-paths.el (paths-find-doc-directory):
>         (paths-find-exec-directory):
>         (paths-find-lisp-directory):
>         (paths-find-mule-lisp-directory):
>         (paths-construct-info-path):
>         (paths-find-data-directory):
>         * packages.el (packages-find-installation-package-directories):
>         * find-paths.el (paths-for-each-emacs-directory):
>         (paths-find-emacs-directories):
>         (paths-find-emacs-directory):
>         (paths-for-each-site-directory):
>         (paths-find-site-directory):
>         (paths-find-site-directories):
>         (paths-for-each-version-directory):
>         (paths-find-version-directories):
>         (paths-find-version-directory): Generalize to multiple bases.
>         (paths-find-architecture-directory): Use above to give roots
>         precedence over bases.  This means, for example, that a directory
>         in an in-place root will always get precedence over an installed
>         root.

This patch applies fine and the resulting sources seem to work OK
under native XP and cygwin, although I must admit I did no module
fiddling.

  - Vin