From ea1e5beac96ab839dc99b71e5d3dda9468a1752a Mon Sep 17 00:00:00 2001 From: Thomas Schneider Date: Tue, 13 Jul 2021 18:24:07 +0200 Subject: Emacs: Tidy backup-directory-alist handling --- dot.emacs.d/init.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'dot.emacs.d/init.el') diff --git a/dot.emacs.d/init.el b/dot.emacs.d/init.el index 727f286..7dfe26d 100644 --- a/dot.emacs.d/init.el +++ b/dot.emacs.d/init.el @@ -12,10 +12,10 @@ (setq use-package-always-ensure t use-package-verbose t) -(defvar --backup-directory (concat user-emacs-directory "backups")) -(if (not (file-exists-p --backup-directory)) - (make-directory --backup-directory t)) -(setq backup-directory-alist `(("." . ,--backup-directory))) +(let ((--backup-directory (concat user-emacs-directory "backups"))) + (unless (file-exists-p --backup-directory) + (make-directory --backup-directory t)) + (setq backup-directory-alist `(("." . ,--backup-directory)))) (setq make-backup-files t ; backup of a file the first time it is saved. backup-by-copying t ; don't clobber symlinks version-control t ; version numbers for backup files -- cgit v1.2.3