diff options
| author | Lars Ingebrigtsen | 2022-06-14 15:01:44 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2022-06-14 15:01:44 +0200 |
| commit | 03124c42019401022e58ca9ebfa9b41735957ffb (patch) | |
| tree | 8934632b9437bd6869c39779f1726595c59f24da | |
| parent | a02bb84c80f63a7b1199f0e68d605f7d418167fd (diff) | |
| download | emacs-03124c42019401022e58ca9ebfa9b41735957ffb.tar.gz emacs-03124c42019401022e58ca9ebfa9b41735957ffb.zip | |
Fix .dir-local.el caching for symlinks
* lisp/files.el (dir-locals-read-from-dir): We want the time stamp
of the actual file, not the time stamp of the symlink (if
.dir-locals.el is a symlink) (bug#46122).
| -rw-r--r-- | lisp/files.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el index 22fccb151cd..a804f0088ee 100644 --- a/lisp/files.el +++ b/lisp/files.el | |||
| @@ -4497,7 +4497,7 @@ Return the new class name, which is a symbol named DIR." | |||
| 4497 | (with-demoted-errors "Error reading dir-locals: %S" | 4497 | (with-demoted-errors "Error reading dir-locals: %S" |
| 4498 | (dolist (file files) | 4498 | (dolist (file files) |
| 4499 | (let ((file-time (file-attribute-modification-time | 4499 | (let ((file-time (file-attribute-modification-time |
| 4500 | (file-attributes file)))) | 4500 | (file-attributes (file-chase-links file))))) |
| 4501 | (if (time-less-p latest file-time) | 4501 | (if (time-less-p latest file-time) |
| 4502 | (setq latest file-time))) | 4502 | (setq latest file-time))) |
| 4503 | (with-temp-buffer | 4503 | (with-temp-buffer |