X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fpackages.el;h=11162e412b4e66012885629115fd637a777de545;hb=8b6a943578dd26817b7514ccb0c19119c314ec60;hp=9ecd6dbb56f820301b37bde8988adfb64f832bf9;hpb=e5cd8d4ed475af329be5df9627a53edd584fd3de;p=chise%2Fxemacs-chise.git-

diff --git a/lisp/packages.el b/lisp/packages.el
index 9ecd6db..11162e4 100644
--- a/lisp/packages.el
+++ b/lisp/packages.el
@@ -350,7 +350,7 @@ This function is basically a wrapper over `locate-file'."
   ;; make sure paths-find-version-directory and paths-find-site-directory
   ;; don't both pick up version-independent directories ...
   (let ((version-directory (paths-find-version-directory roots base nil nil t))
-	(site-directory (paths-find-site-directory roots base)))
+	(site-directory (paths-find-site-directory roots base nil nil t)))
     (paths-uniq-append
      (and version-directory (list version-directory))
      (and site-directory (list site-directory)))))