Mercurial > hg > xemacs-beta

diff lisp/package-admin.el @ 392:1f50e6fe4f3f r21-2-11

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-11
author cvs
date Mon, 13 Aug 2007 11:10:50 +0200
parents aabb7f5b1c81
children 74fd4e045ea6
line wrap: on
line diff
--- a/lisp/package-admin.el	Mon Aug 13 11:10:04 2007 +0200
+++ b/lisp/package-admin.el	Mon Aug 13 11:10:50 2007 +0200
@@ -177,7 +177,9 @@
 	;; 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)))))))