diff --git a/emacs/init.el b/emacs/init.el index 8798705..73f9099 100644 --- a/emacs/init.el +++ b/emacs/init.el @@ -14,13 +14,33 @@ (column-number-mode 1) (whitespace-mode 1) +(defvar xdg-cache-dir + (or (getenv "XDG_CACHE_HOME") + (expand-file-name "~/.cache"))) + +;; Autosaves +(setq autfo-save-file-name-transforms + `((".*" ,(expand-file-name "emacs/autosaves/" xdg-cache-dir) t))) + +;; Backups +(setq backup-directory-alist + `(("." . ,(expand-file-name "emacs/backups/" xdg-cache-dir)))) + +;; Lockfiles +(setq lock-file-name-transforms + `((".*" ,(expand-file-name "emacs/lockfiles/" xdg-cache-dir) t))) + +;; Make sure directories exist +(dolist (dir '("autosaves" "backups" "lockfiles")) + (make-directory (expand-file-name (concat "emacs/" dir) xdg-cache-dir) t)) + (use-package paredit :ensure t :hook ((emacs-lisp-mode - lisp-mode - clojure-mode - scheme-mode - racket-mode) . paredit-mode) + lisp-mode + clojure-mode + scheme-mode + racket-mode) . paredit-mode) :config (setq paredit-everywhere t)) @@ -36,7 +56,7 @@ :config (load-theme 'modus-vivendi-tinted t)) -(set-face-attribute 'default nil :height 50) +(set-face-attribute 'default nil :height 140) (when (find-font (font-spec :family uconf-font-name))