diff options
| author | Glenn Morris | 2017-05-31 21:13:40 -0400 |
|---|---|---|
| committer | Glenn Morris | 2017-05-31 21:13:40 -0400 |
| commit | 6aacd4fb09517b0dedf62333f0e27b28e8732f63 (patch) | |
| tree | 17a205e55ecf73bfa3de6aa963dcea341f9ed0da /src/emacs.c | |
| parent | c4ecc01a45c6dd183f0ecf65e4c4c2c39beea278 (diff) | |
| download | emacs-6aacd4fb09517b0dedf62333f0e27b28e8732f63.tar.gz emacs-6aacd4fb09517b0dedf62333f0e27b28e8732f63.zip | |
Use true names for invocation- and source-directory
* src/emacs.c (init_cmdargs) <Vinvocation_directory>:
* src/lread.c (init_lread) <Vsource_directory>: Use true names.
Diffstat (limited to 'src/emacs.c')
| -rw-r--r-- | src/emacs.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/emacs.c b/src/emacs.c index 6ed16e80372..49ebb817678 100644 --- a/src/emacs.c +++ b/src/emacs.c | |||
| @@ -463,6 +463,9 @@ init_cmdargs (int argc, char **argv, int skip_args, char *original_pwd) | |||
| 463 | 463 | ||
| 464 | if (!NILP (Vinvocation_directory)) | 464 | if (!NILP (Vinvocation_directory)) |
| 465 | { | 465 | { |
| 466 | if (NILP (Vpurify_flag) && !NILP (Ffboundp (Qfile_truename))) | ||
| 467 | Vinvocation_directory = call1 (Qfile_truename, Vinvocation_directory); | ||
| 468 | |||
| 466 | dir = Vinvocation_directory; | 469 | dir = Vinvocation_directory; |
| 467 | #ifdef WINDOWSNT | 470 | #ifdef WINDOWSNT |
| 468 | /* If we are running from the build directory, set DIR to the | 471 | /* If we are running from the build directory, set DIR to the |