Do not spill temporary files everywhere

diff --git a/emacs/emacs.el b/emacs/emacs.el
index 99198bb089fa2ec801c86fe2e02476c74fcab600..47fd77f7293aeb5768d8939206068b8a02d871c8 100644 (file)
--- a/emacs/emacs.el
+++ b/emacs/emacs.el
@@ -51,6 +51,12 @@
 (setq undo-tree-visualizer-timestamp t)
 (setq undo-tree-auto-save-history t)
 
+;; Do not spill temporary files everywhere
+
+(defvar --backup-directory (concat user-emacs-directory "backups"))
+(if (not (file-exists-p --backup-directory))
+        (make-directory --backup-directory t))
+
 ;; nicer completion UI
 
 (straight-use-package 'helm)