diff options
| author | Richard M. Stallman <rms@gnu.org> | 1999-07-02 12:57:10 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1999-07-02 12:57:10 +0000 |
| commit | 0fa248bcc0cac1519c0ec75a43e3ba8a2b8f09e6 (patch) | |
| tree | e1d77dbedb151ad8e05a8b4dcdf819ab24061932 | |
| parent | df01192be7a249c771330e203a9ff6dbcffd72d9 (diff) | |
| download | emacs-0fa248bcc0cac1519c0ec75a43e3ba8a2b8f09e6.tar.gz | |
(init_callproc): Set exec_directory if installation_directory is
non-nil, without a test of exec_path.
| -rw-r--r-- | src/callproc.c | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/src/callproc.c b/src/callproc.c index d6be8b6ff03..61b25e15e9f 100644 --- a/src/callproc.c +++ b/src/callproc.c @@ -1272,14 +1272,13 @@ init_callproc () Lisp_Object tem; tem = Fexpand_file_name (build_string ("lib-src"), Vinstallation_directory); - if (NILP (Fmember (tem, Vexec_path))) - { #ifndef DOS_NT /* MSDOS uses wrapped binaries, so don't do this. */ - Vexec_path = nconc2 (Vexec_path, Fcons (tem, Qnil)); - Vexec_directory = Ffile_name_as_directory (tem); + if (NILP (Fmember (tem, Vexec_path))) + Vexec_path = nconc2 (Vexec_path, Fcons (tem, Qnil)); + + Vexec_directory = Ffile_name_as_directory (tem); #endif /* not DOS_NT */ - } /* Maybe use ../etc as well as ../lib-src. */ if (data_dir == 0) |