diff options
| author | Richard M. Stallman | 1995-07-20 19:28:08 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1995-07-20 19:28:08 +0000 |
| commit | e17f75338abc9037622c7f8b055c62d416dc30fb (patch) | |
| tree | 151858132b85f24c780ede773918d77afd0dd3f6 /src | |
| parent | 872e2c822b70d61a5aa3ce9a5074da829c2818b5 (diff) | |
| download | emacs-e17f75338abc9037622c7f8b055c62d416dc30fb.tar.gz emacs-e17f75338abc9037622c7f8b055c62d416dc30fb.zip | |
(init_callproc): Set Vdoc_directory based on
Vinstallation_directory when that's non-nil, regardless of whether
we had to set Vexec_directory.
Diffstat (limited to 'src')
| -rw-r--r-- | src/callproc.c | 19 |
1 files changed, 9 insertions, 10 deletions
diff --git a/src/callproc.c b/src/callproc.c index ea995b6b09f..3838348f0fb 100644 --- a/src/callproc.c +++ b/src/callproc.c | |||
| @@ -995,7 +995,7 @@ init_callproc_1 () | |||
| 995 | Vexec_path = nconc2 (decode_env_path ("PATH", ""), Vexec_path); | 995 | Vexec_path = nconc2 (decode_env_path ("PATH", ""), Vexec_path); |
| 996 | } | 996 | } |
| 997 | 997 | ||
| 998 | /* This is run after init_cmdargs, so that Vinvocation_directory is valid. */ | 998 | /* This is run after init_cmdargs, when Vinstallation_directory is valid. */ |
| 999 | 999 | ||
| 1000 | init_callproc () | 1000 | init_callproc () |
| 1001 | { | 1001 | { |
| @@ -1017,21 +1017,20 @@ init_callproc () | |||
| 1017 | Vexec_path = nconc2 (Vexec_path, Fcons (tem, Qnil)); | 1017 | Vexec_path = nconc2 (Vexec_path, Fcons (tem, Qnil)); |
| 1018 | Vexec_directory = Ffile_name_as_directory (tem); | 1018 | Vexec_directory = Ffile_name_as_directory (tem); |
| 1019 | #endif /* not DOS_NT */ | 1019 | #endif /* not DOS_NT */ |
| 1020 | } | ||
| 1020 | 1021 | ||
| 1021 | /* If we use ../lib-src, maybe use ../etc as well. | 1022 | /* Maybe use ../etc as well as ../lib-src. */ |
| 1022 | Do so if ../etc exists and has our DOC-... file in it. */ | 1023 | if (data_dir == 0) |
| 1023 | if (data_dir == 0) | 1024 | { |
| 1024 | { | 1025 | tem = Fexpand_file_name (build_string ("etc"), |
| 1025 | tem = Fexpand_file_name (build_string ("etc"), | 1026 | Vinstallation_directory); |
| 1026 | Vinstallation_directory); | 1027 | Vdoc_directory = Ffile_name_as_directory (tem); |
| 1027 | Vdoc_directory = Ffile_name_as_directory (tem); | ||
| 1028 | } | ||
| 1029 | } | 1028 | } |
| 1030 | } | 1029 | } |
| 1031 | 1030 | ||
| 1032 | /* Look for the files that should be in etc. We don't use | 1031 | /* Look for the files that should be in etc. We don't use |
| 1033 | Vinstallation_directory, because these files are never installed | 1032 | Vinstallation_directory, because these files are never installed |
| 1034 | in /bin near the executable, and they are never in the build | 1033 | near the executable, and they are never in the build |
| 1035 | directory when that's different from the source directory. | 1034 | directory when that's different from the source directory. |
| 1036 | 1035 | ||
| 1037 | Instead, if these files are not in the nominal place, we try the | 1036 | Instead, if these files are not in the nominal place, we try the |