X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=FLIM-CFG;h=37ddd2a4aa90847209fbc8ae1f91cb20f4c3ce3b;hb=6769bf5954ca2bf221dfa9a41e2d47b24a135d79;hp=0e8158837e57ab243f83482af6e4eb7b23a52be4;hpb=fade20a6975e2c8619e919cd9e736a32ba934519;p=elisp%2Fflim.git

diff --git a/FLIM-CFG b/FLIM-CFG
index 0e81588..37ddd2a 100644
--- a/FLIM-CFG
+++ b/FLIM-CFG
@@ -49,4 +49,18 @@
 
 (setq FLIM_DIR (expand-file-name FLIM_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)))
+
 ;;; FLIM-CFG ends here