wip: feat: Autosaving and recent files

This commit is contained in:
Madeleine Sydney
2025-01-07 04:30:21 -07:00
parent ae74a9a15a
commit cc759a73ea
5 changed files with 49 additions and 15 deletions

View File

@@ -0,0 +1,39 @@
;;; syd-autosave.el -*- lexical-binding: t; -*-
(require 'syd-prelude)
(use-package emacs
:config
(setq backup-directory-alist
`(("." . (file-name-concat syd-data-dir "backup")))
;; Nil means untracked files under VC won't get backed up.
vc-make-backup-files t
;; Nil will clobber symlinks.
backup-by-copying t
;; Use versioned backups.
version-control t
auto-save-file-name-transforms
;; Good grief, girl...
`(("\\`/[^/]*:\\([^/]*/\\)*\\([^/]*\\)\\'"
,(file-name-concat syd-cache-dir "autosave" "tramp-\\2") t)
(".*"
,(file-name-concat syd-cache-dir "autosave") t))
kept-new-versions 5
delete-old-versions t
save-place-file (file-name-concat syd-cache-dir "places")
bookmark-default-file (file-name-concat syd-data-dir "bookmarks")
recentf-save-file (file-name-concat syd-data-dir "recentf")))
;; Save your cursor position in recently-opened files.
(use-package saveplace
:config
(save-place-mode 1))
;; Keep track of recently-visited files.
(use-package recentf
:config
(add-hook 'find-file-hook #'recentf-save-list)
(recentf-mode 1))
(provide 'syd-autosave)