Adjust load-path

2 files changed, 8 insertions, 3 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index d50f9fbe518..32d0a243aa0 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-31  Stefan Monnier  <monnier@iro.umontreal.ca>
 
         * gtkutil.c (xg_tool_bar_callback): Generate a single TOOL_BAR_EVENT.
diff --git a/src/mac.c b/src/mac.c
index a64c3d208e3..ba0650c6051 100644
--- a/src/mac.c
+++ b/src/mac.c
@@ -5327,12 +5327,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')
@@ -5341,7 +5341,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')