aboutsummaryrefslogtreecommitdiff
path: root/dot.emacs.d/init.el
diff options
context:
space:
mode:
authorThomas Schneider <qsx@chaotikum.eu>2024-08-26 16:27:46 +0200
committerThomas Schneider <qsx@chaotikum.eu>2024-08-26 16:27:46 +0200
commit07c02e466161a139e0e9cd12aaff72028fb2a365 (patch)
treeab15320c3c27f3ad25d918c1e0fc1f034b1e8678 /dot.emacs.d/init.el
parent680f60351d7d6793acd07393a76175d93a0bd43a (diff)
Emacs: qsx-backup-enable-predicate: Canonicalise all names
Diffstat (limited to 'dot.emacs.d/init.el')
-rw-r--r--dot.emacs.d/init.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/dot.emacs.d/init.el b/dot.emacs.d/init.el
index b87158c..a6ea5af 100644
--- a/dot.emacs.d/init.el
+++ b/dot.emacs.d/init.el
@@ -35,8 +35,10 @@
(let ((directory
(file-name-directory (file-truename (expand-file-name name))))
(auto-save-list-directory
- (file-name-as-directory
- (locate-user-emacs-file "auto-save-list"))))
+ (file-truename
+ (expand-file-name
+ (file-name-as-directory
+ (locate-user-emacs-file "auto-save-list"))))))
(if (string= directory auto-save-list-directory)
nil
(normal-backup-enable-predicate name))))