;;; oni-private-storage.el --- Configuration for file storage -*- lexical-binding: t; -*- ;; Copyright (C) 2019 Tom Willemse ;; Author: Tom Willemse ;; Keywords: local ;; Version: 20190124011031 ;; This program is free software; you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by ;; the Free Software Foundation, either version 3 of the License, or ;; (at your option) any later version. ;; This program is distributed in the hope that it will be useful, ;; but WITHOUT ANY WARRANTY; without even the implied warranty of ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ;; GNU General Public License for more details. ;; You should have received a copy of the GNU General Public License ;; along with this program. If not, see . ;;; Commentary: ;; Emacs and packages frequently store files in the ;; ‘user-emacs-directory’. I prefer to keep it clean and store these ;; data files in their own directory. ;;; Code: ;;; Put backup and auto save files in their own directories so they ;;; don't clutter the rest of the filesystem. (setq backup-directory-alist `((".*" . ,(concat user-emacs-directory "data/backup-files")))) (add-to-list 'auto-save-file-name-transforms `(".*" ,(concat user-emacs-directory "data/auto-save-files/") t) :append) (setq auto-save-list-file-prefix (concat user-emacs-directory "data/" "auto-save-list/.saves-")) (eval-when-compile (require 'bookmark)) (setq bookmark-default-file (concat user-emacs-directory "data/bookmarks")) (setq abbrev-file-name (concat user-emacs-directory "data/abbrev_defs")) (eval-when-compile (require 'forge-db nil :noerror)) (setq forge-database-file (concat user-emacs-directory "data/forge-database.sqlite")) (eval-when-compile (require 'projectile nil :noerror)) (setq projectile-cache-file (concat user-emacs-directory "data/projectile.cache")) (setq projectile-known-projects-file (concat user-emacs-directory "data/projectile-bookmarks.eld")) (eval-when-compile (require 'tramp-cache)) (setq tramp-persistency-file-name (concat user-emacs-directory "data/tramp")) ;;;###autoload(with-eval-after-load 'files (require 'oni-private-storage)) (provide 'oni-private-storage) ;;; oni-private-storage.el ends here