Mercurial > hg > xemacs-beta

diff lisp/package-get.el @ 1561:6f4c71266175

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2003-07-05 08:40:36 by adrian] xemacs-21.5: package installation fixes -------------------- ChangeLog entries follow: -------------------- lisp/ChangeLog addition: 2003-07-05 Adrian Aichner <adrian@xemacs.org> * package-admin.el (package-admin-find-top-directory): Simplify directory comparisions and fix substring errors on short path components. * package-get.el (package-get-package-index-file-location): Default to first component of "EMACSPACKAGEPATH", if set.
author adrian
date Sat, 05 Jul 2003 08:40:37 +0000
parents 410360d3e34e
children dc1a3d060f4f
line wrap: on
line diff
--- a/lisp/package-get.el	Fri Jul 04 21:52:20 2003 +0000
+++ b/lisp/package-get.el	Sat Jul 05 08:40:37 2003 +0000
@@ -171,7 +171,7 @@
 
 ;;;###autoload
 (defcustom package-get-package-index-file-location 
-  (or (getenv "EMACSPACKAGEPATH")
+  (or (car (split-path (getenv "EMACSPACKAGEPATH")))
       user-init-directory)
   "*The directory where the package-index file can be found."
   :type 'directory