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/lread.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/lread.c')
| -rw-r--r-- | src/lread.c | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/lread.c b/src/lread.c index 9e2168e7db4..368b86e8189 100644 --- a/src/lread.c +++ b/src/lread.c | |||
| @@ -4482,6 +4482,9 @@ load_path_default (void) | |||
| 4482 | void | 4482 | void |
| 4483 | init_lread (void) | 4483 | init_lread (void) |
| 4484 | { | 4484 | { |
| 4485 | if (NILP (Vpurify_flag) && !NILP (Ffboundp (Qfile_truename))) | ||
| 4486 | Vsource_directory = call1 (Qfile_truename, Vsource_directory); | ||
| 4487 | |||
| 4485 | /* First, set Vload_path. */ | 4488 | /* First, set Vload_path. */ |
| 4486 | 4489 | ||
| 4487 | /* Ignore EMACSLOADPATH when dumping. */ | 4490 | /* Ignore EMACSLOADPATH when dumping. */ |