From: tomo <tomo>
Date: Wed, 2 Mar 2005 18:45:08 +0000 (+0000)
Subject: (install-arch-indep): As the symbolic link for chise-db-directory/db,
X-Git-Tag: r21-4-15-chise-0_22^2~319
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=136707f5ff2ab23b91116d159fd2c20cb34fd74c;p=chise%2Fxemacs-chise.git-

(install-arch-indep): As the symbolic link for chise-db-directory/db,
use relative directory instead of absolute directory of
${etcdir}/chise-db.
---

diff --git a/Makefile.in.in b/Makefile.in.in
index fbd73f9..0f4ef8e 100644
--- a/Makefile.in.in
+++ b/Makefile.in.in
@@ -518,13 +518,29 @@ install-arch-indep: mkdir info
 	    chmod 0644 ${mandir}/$${page}${manext} ; \
 	  done
 #ifdef HAVE_LIBCHISE
-	${LN_S} ${etcdir}/chise-db `${blddir}/src/${PROGNAME} -batch -vanilla -eval "\
-(let ((path (expand-file-name \"db\" chise-db-directory)))\
+	${blddir}/src/${PROGNAME} -batch -vanilla -eval "\
+(let ((path (expand-file-name \"db\" chise-db-directory))\
+      (data-dir \"${etcdir}/chise-db\")\
+      (i 0)\
+      (default-directory chise-db-directory)\
+      len chise-dir pre)\
   (if (file-exists-p chise-db-directory)\
       (if (file-exists-p path)\
 	  (delete-file path))\
     (make-directory chise-db-directory t))\
-  (princ path))"`
+  (setq len (min (length data-dir) (length path)))\
+  (while (and (< i len)\
+	      (eq (aref path i) (aref data-dir i)))\
+    (setq i (1+ i)))\
+  (setq data-dir (substring data-dir i)\
+	chise-dir (substring path i))\
+  (setq i 0\
+	len (length chise-dir))\
+  (while (< i len)\
+    (if (eq (aref chise-dir i) ?/)\
+	(setq pre (concat pre \"../\")))\
+    (setq i (1+ i)))\
+  (make-symbolic-link (concat pre data-dir) path t))"
 #endif
 	@echo "If you would like to save approximately 2M of disk space, do"
 	@echo "make gzip-el"