aboutsummaryrefslogtreecommitdiffstats
path: root/src/callproc.c
diff options
context:
space:
mode:
authorGlenn Morris2013-11-25 20:06:23 -0500
committerGlenn Morris2013-11-25 20:06:23 -0500
commit624780f09dd117edbe8b2b71be44622fc7002f91 (patch)
tree268725fa70a8295b1c621646a7ad82eea11176f1 /src/callproc.c
parent3f73284a46437b46bbd79f2594c3bcefde83a2e8 (diff)
downloademacs-624780f09dd117edbe8b2b71be44622fc7002f91.tar.gz
emacs-624780f09dd117edbe8b2b71be44622fc7002f91.zip
Preload leim-list.el
* Makefile.in (abs_builddir): New, set by configure. (buildlisppath): Add leim/. (epaths-force-w32): Set BLD. * lisp/loadup.el: Load leim-list.el when found. * lisp/startup.el (normal-top-level): Skip re-loading leim/leim-list.el. * nt/epaths.nt (PATH_DUMPLOADSEARCH): Add leim/. * src/callproc.c (init_callproc): Don't assume PATH_DUMPLOADSEARCH is a single directory. * src/epaths.in (PATH_DUMPLOADSEARCH): Add leim/. Fixes: debbugs:4789
Diffstat (limited to 'src/callproc.c')
-rw-r--r--src/callproc.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/callproc.c b/src/callproc.c
index dfe315ab8db..b44f680b352 100644
--- a/src/callproc.c
+++ b/src/callproc.c
@@ -1607,16 +1607,16 @@ init_callproc (void)
1607 if (data_dir == 0) 1607 if (data_dir == 0)
1608 { 1608 {
1609 Lisp_Object tem, tem1, srcdir; 1609 Lisp_Object tem, tem1, srcdir;
1610 Lisp_Object lispdir = Fcar (decode_env_path (0, PATH_DUMPLOADSEARCH, 0));
1611
1612 srcdir = Fexpand_file_name (build_string ("../src/"), lispdir);
1610 1613
1611 srcdir = Fexpand_file_name (build_string ("../src/"),
1612 build_unibyte_string (PATH_DUMPLOADSEARCH));
1613 tem = Fexpand_file_name (build_string ("GNU"), Vdata_directory); 1614 tem = Fexpand_file_name (build_string ("GNU"), Vdata_directory);
1614 tem1 = Ffile_exists_p (tem); 1615 tem1 = Ffile_exists_p (tem);
1615 if (!NILP (Fequal (srcdir, Vinvocation_directory)) || NILP (tem1)) 1616 if (!NILP (Fequal (srcdir, Vinvocation_directory)) || NILP (tem1))
1616 { 1617 {
1617 Lisp_Object newdir; 1618 Lisp_Object newdir;
1618 newdir = Fexpand_file_name (build_string ("../etc/"), 1619 newdir = Fexpand_file_name (build_string ("../etc/"), lispdir);
1619 build_unibyte_string (PATH_DUMPLOADSEARCH));
1620 tem = Fexpand_file_name (build_string ("GNU"), newdir); 1620 tem = Fexpand_file_name (build_string ("GNU"), newdir);
1621 tem1 = Ffile_exists_p (tem); 1621 tem1 = Ffile_exists_p (tem);
1622 if (!NILP (tem1)) 1622 if (!NILP (tem1))