msyds/sydnix
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

feat: Redirect custom file to cache dir

Browse Source
This commit is contained in:
Madeleine Sydney
2025-01-16 11:22:21 -07:00
parent 7d7c97fc7b
commit c61c939f6c
3 changed files with 21 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
users/crumb/programs/emacs/init.el
View File

@@ -16,6 +16,7 @@
(require 'syd-age)
(require 'syd-autosave)
(require 'syd-completion)
(require 'syd-custom)
(require 'syd-display-startup-time)
(require 'syd-evil)
(require 'syd-keybinds)

8
users/crumb/programs/emacs/lib/syd-constants.el
View File

@@ -3,11 +3,15 @@
(defvar syd-data-dir
(or (getenv "EMACS_DATA_DIR")
(error "Need $EMACS_DATA_DIR"))
"Directory analogous to XDG_DATA_HOME for miscellaneous Emacs things.")
"Directory analogous to XDG_DATA_HOME for miscellaneous Emacs things. Sydnix
will wipe this on boot!")
(defvar syd-cache-dir
(or (getenv "EMACS_CACHE_DIR")
(error "Need $EMACS_CACHE_DIR")))
(error "Need $EMACS_CACHE_DIR"))
"Directory analogous to XDG_CACHE_HOME for miscellaneous Emacs things. Sydnix
will not usually wipe this on boot; /however/ it is still free to clear this
directory at any time.")
(provide 'syd-constants)
;;; syd-constants.el ends here

14
users/crumb/programs/emacs/modules/syd-custom.el Normal file
View File

@@ -0,0 +1,14 @@
;;; syd-custom.el -*- lexical-binding: t; -*-
;; To discourage use of the custom file, we store it somewhere will
;; Impermanence will wipe it.
(use-package emacs
;; TODO: I'd like to allow /some/ custom variables. E.g., the trusted
;; dir-locals files. See `hack-dir-local-variables'. It has some hooks that
;; should make this accomplishable.
:custom (custom-file (file-name-concat syd-data-dir "custom.el"))
:config
(when (file-readable-p custom-file)
(load custom-file)))
(provide 'syd-custom)