# HG changeset patch
# User michaels
# Date 1023209154 0
# Node ID 987c2a685f395d24eaf2914390097b2869a7ef22
# Parent  5b3cf2203477d2b4e44c9f2be0fcfe0553023b89
[xemacs-hg @ 2002-06-04 16:45:42 by michaels]
2002-06-04  Jerry James <james@eecs.ku.edu>

	* find-paths.el (paths-find-architecture-directory): Search in
	`system-configuration'/`base', not `base'`system-configuration'.

diff -r 5b3cf2203477 -r 987c2a685f39 lisp/ChangeLog
--- a/lisp/ChangeLog	Tue Jun 04 06:12:31 2002 +0000
+++ b/lisp/ChangeLog	Tue Jun 04 16:45:54 2002 +0000
@@ -1,3 +1,8 @@
+2002-06-04  Jerry James <james@eecs.ku.edu>
+
+	* find-paths.el (paths-find-architecture-directory): Search in
+	`system-configuration'/`base', not `base'`system-configuration'.
+
 2002-06-03  Andy Piper  <andy@xemacs.org>
 
 	* dialog-items.el (make-search-dialog): align various subcontrols
diff -r 5b3cf2203477 -r 987c2a685f39 lisp/find-paths.el
--- a/lisp/find-paths.el	Tue Jun 04 06:12:31 2002 +0000
+++ b/lisp/find-paths.el	Tue Jun 04 16:45:54 2002 +0000
@@ -237,7 +237,8 @@
   (or
    ;; from more to less specific
    (paths-find-version-directory roots
-				 (concat base system-configuration)
+				 (paths-construct-path
+				  (list system-configuration base))
 				 envvar default)
    (paths-find-version-directory roots
 				 base