Mercurial > hg > xemacs-beta

diff lisp/package-admin.el @ 333:4f79e16b1112 r21-0-64

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0-64
author cvs
date Mon, 13 Aug 2007 10:49:50 +0200
parents 03446687b7cc
children a4f53d9b3154
line wrap: on
line diff
--- a/lisp/package-admin.el	Mon Aug 13 10:49:08 2007 +0200
+++ b/lisp/package-admin.el	Mon Aug 13 10:49: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)))))))