Adjust load-path

2 files changed, 8 insertions, 3 deletions

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')