changeset 3813:ccceded4ee72

[xemacs-hg @ 2007-02-05 15:19:17 by michaels] 2007-01-27 Mike Sperber <mike@xemacs.org> * setup-paths.el (paths-module-load-path-depth): Add. * setup-paths.el (paths-construct-module-load-path): For `module-load-path', use `paths-module-load-path-depth', not `paths-core-load-path-depth'.
author michaels
date Mon, 05 Feb 2007 15:19:18 +0000
parents e4ef31254734
children b98f0084dc23
files lisp/ChangeLog lisp/setup-paths.el
diffstat 2 files changed, 11 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Sun Feb 04 22:51:09 2007 +0000
+++ b/lisp/ChangeLog	Mon Feb 05 15:19:18 2007 +0000
@@ -1,3 +1,10 @@
+2007-01-27  Mike Sperber  <mike@xemacs.org>
+
+	* setup-paths.el (paths-module-load-path-depth): Add.
+	* setup-paths.el (paths-construct-module-load-path): For
+	`module-load-path', use `paths-module-load-path-depth', not
+	`paths-core-load-path-depth'.
+
 2006-12-30  Aidan Kehoe  <kehoea@parhasard.net>
 
 	* mule/cyrillic.el ("Cyrillic-ISO"):
--- a/lisp/setup-paths.el	Sun Feb 04 22:51:09 2007 +0000
+++ b/lisp/setup-paths.el	Mon Feb 05 15:19:18 2007 +0000
@@ -55,6 +55,9 @@
 (defvar paths-mule-load-path-depth 0
   "Depth of load-path searches in Mule Lisp paths.")
 
+(defvar paths-module-load-path-depth 1
+  "Depth of load-path searches in module paths.")
+
 (defvar paths-default-info-directories
   (mapcar (function
 	   (lambda (dirlist)
@@ -243,7 +246,7 @@
 	 (module-load-path
 	  (and module-directory
 	       (paths-find-recursive-load-path (list module-directory)
-					       paths-core-load-path-depth))))
+					       paths-module-load-path-depth))))
     (append env-module-path
 	    site-module-load-path
 	    module-load-path)))