X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=lisp%2Fpackage-admin.el;h=d5603ec332580dcd7a534dd22a9265617d81211e;hp=2c994409141d904ced9dd51bc111da309a6c37fd;hb=28a3fa29bc0bd9a124b6e3379e82d62e815c22a2;hpb=cfe4120f7310b0d3a0a186a91c9e18efe6b1320f

diff --git a/lisp/package-admin.el b/lisp/package-admin.el
index 2c99440..d5603ec 100644
--- a/lisp/package-admin.el
+++ b/lisp/package-admin.el
@@ -177,7 +177,9 @@ or return a location appropriate for the package otherwise."
 	;; Ok we need to guess
 	(if mule-related
 	    (package-admin-get-install-dir 'mule-base nil nil)
-	  (car (last late-packages)))))))
+	  (if (eq package 'xemacs-base)
+	      (car (last late-packages))
+	    (package-admin-get-install-dir 'xemacs-base nil nil)))))))