small init.el

init.el

(defvar rk/backup-dir (expand-file-name "backup" user-emacs-directory))

(unless (file-exists-p rk/backup-dir)
  (mkdir rk/backup-dir))

(setq
   backup-by-copying t      ; don't clobber symlinks
   delete-old-versions t
   kept-new-versions 6
   kept-old-versions 2
   version-control t       ; use versioned backups
   backup-directory-alist
      `((".*" . ,rk/backup-dir))
   auto-save-file-name-transforms
      `((".*" ,rk/backup-dir t)))