X-Git-Url: http://git.chise.org/gitweb/?p=elisp%2Fmu-cite.git;a=blobdiff_plain;f=MU-CFG;h=801824eb540b940f8681e7f6f330cecf75740324;hp=be4e4210dc9d191ebcd50c0ffa588705a4b67109;hb=HEAD;hpb=2805aa7d7e2495909e98d9e2c973f88d51a7d845

diff --git a/MU-CFG b/MU-CFG
index be4e421..801824e 100644
--- a/MU-CFG
+++ b/MU-CFG
@@ -32,12 +32,11 @@
 (add-to-list 'load-path
 	     (expand-file-name "../../site-lisp/flim" data-directory))
 
-(require 'poe)
-
 (if (boundp 'LISPDIR)
     (progn
       (add-to-list 'default-load-path LISPDIR)
       (add-to-list 'load-path LISPDIR)
+      (add-to-list 'load-path (expand-file-name "emu" LISPDIR))
       (add-to-list 'load-path (expand-file-name "apel" LISPDIR))
       (add-to-list 'load-path (expand-file-name "flim" LISPDIR))
       ))
@@ -79,17 +78,6 @@
 (setq MU_DIR (expand-file-name MU_PREFIX LISPDIR))
 
 (defvar PACKAGEDIR
-  (if (boundp 'early-packages)
-      (let ((dirs (append (if early-package-load-path
-			      early-packages)
-			  (if late-package-load-path
-			      late-packages)
-			  (if last-package-load-path
-			      last-packages)))
-	    dir)
-	(while (not (file-exists-p
-		     (setq dir (car dirs))))
-	  (setq dirs (cdr dirs)))
-	dir)))
+  (install-get-default-package-directory))
 
 ;;; MU-CFG ends here