From: Vinicius Jose Latorre <viniciusjl@ig.com.br>
Date: Wed, 1 Aug 2007 21:43:46 +0000 (+0000)
Subject: Adjust load-path
X-Git-Tag: emacs-pretest-22.1.90~1127
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ec96293f2d44298b54a84f308a3d5d735701f122;p=emacs.git

Adjust load-path
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 835379d9cde..4a175882a98 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2007-08-01  Seiji Zenitani  <zenitani@mac.com>
+
+	* mac.c (init_mac_osx_environment): Adjust load-path on self-contained
+	build.
+
 2007-07-30  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* eval.c (init_eval_once): Bump max_lisp_eval_depth to 400.
diff --git a/src/mac.c b/src/mac.c
index 0321e8f2ae1..7f22c19936b 100644
--- a/src/mac.c
+++ b/src/mac.c
@@ -5331,12 +5331,12 @@ init_mac_osx_environment ()
       q[0] = '\0';
 
       strcpy (p, app_bundle_pathname);
-      strcat (p, "/Contents/Resources/lisp");
+      strcat (p, "/Contents/Resources/site-lisp");
       if (stat (p, &st) == 0 && (st.st_mode & S_IFMT) == S_IFDIR)
 	strcat (q, p);
 
       strcpy (p, app_bundle_pathname);
-      strcat (p, "/Contents/Resources/leim");
+      strcat (p, "/Contents/Resources/lisp");
       if (stat (p, &st) == 0 && (st.st_mode & S_IFMT) == S_IFDIR)
 	{
 	  if (q[0] != '\0')
@@ -5345,7 +5345,7 @@ init_mac_osx_environment ()
 	}
 
       strcpy (p, app_bundle_pathname);
-      strcat (p, "/Contents/Resources/site-lisp");
+      strcat (p, "/Contents/Resources/leim");
       if (stat (p, &st) == 0 && (st.st_mode & S_IFMT) == S_IFDIR)
 	{
 	  if (q[0] != '\0')