New upstream version 1.1.0
Lev Lamberov
3 years ago
0 | ;;; no-littering.el --- help keeping ~/.emacs.d clean | |
1 | ||
2 | ;; Copyright (C) 2016-2019 Jonas Bernoulli | |
0 | ;;; no-littering.el --- help keeping ~/.emacs.d clean -*- lexical-binding: t; -*- | |
1 | ||
2 | ;; Copyright (C) 2016-2020 Jonas Bernoulli | |
3 | 3 | |
4 | 4 | ;; Author: Jonas Bernoulli <jonas@bernoul.li> |
5 | 5 | ;; Homepage: https://github.com/emacscollective/no-littering |
197 | 197 | (symbol-function #'no-littering-expand-etc-file-name)) |
198 | 198 | ((symbol-function 'var) |
199 | 199 | (symbol-function #'no-littering-expand-var-file-name))) |
200 | (make-directory no-littering-etc-directory t) | |
201 | (make-directory no-littering-var-directory t) | |
200 | 202 | (with-no-warnings ; many of these variables haven't been defined yet |
201 | 203 | |
202 | 204 | ;;; Built-in packages |
211 | 213 | (setq desktop-dirname (var "desktop/")) |
212 | 214 | (setq desktop-path (list desktop-dirname)) |
213 | 215 | (setq diary-file (var "diary")) |
216 | (setq ede-project-placeholder-cache-file (var "ede-projects.el")) | |
214 | 217 | (setq epkg-repository (var "epkgs/")) |
215 | 218 | (setq eshell-directory-name (var "eshell/")) |
219 | (setq eudc-options-file (etc "eudc-options.el")) | |
216 | 220 | (eval-after-load 'eww |
217 | 221 | `(make-directory ,(var "eww/") t)) |
218 | 222 | (setq eww-bookmarks-directory (var "eww/")) |
223 | (setq filesets-menu-cache-file (var "filesets-menu-cache.el")) | |
219 | 224 | (setq gamegrid-user-score-file-directory (var "gamegrid-user-score/")) |
220 | 225 | (setq ido-save-directory-list-file (var "ido-save-directory-list.el")) |
221 | 226 | (setq image-dired-db-file (var "image-dired/db.el")) |
228 | 233 | `(make-directory ,(var "newsticker/") t)) |
229 | 234 | (setq newsticker-cache-filename (var "newsticker/cache.el")) |
230 | 235 | (setq newsticker-dir (var "newsticker/data/")) |
236 | (setq nix-buffer-directory-name (var "nix-buffer/")) | |
231 | 237 | (setq nsm-settings-file (var "nsm-settings.el")) |
232 | 238 | (eval-after-load 'org |
233 | 239 | `(make-directory ,(var "org/") t)) |
241 | 247 | (setq remember-data-directory (var "remember/data.d/")) |
242 | 248 | (setq save-place-file (var "save-place.el")) |
243 | 249 | (setq savehist-file (var "savehist.el")) |
250 | (setq srecode-map-save-file (var "srecode-map.el")) | |
244 | 251 | (setq semanticdb-default-save-directory (var "semantic/")) |
245 | 252 | (setq shared-game-score-directory (var "shared-game-score/")) |
246 | 253 | (setq tramp-auto-save-directory (var "tramp/auto-save/")) |
255 | 262 | (setq anaconda-mode-installation-directory (var "anaconda-mode/")) |
256 | 263 | (setq annotate-file (var "annotations.el")) |
257 | 264 | (setq async-byte-compile-log-file (var "async-bytecomp.log")) |
265 | (setq auto-package-update-last-update-day-path (var "auto-package-update-last-update-day")) | |
258 | 266 | (eval-after-load 'bbdb |
259 | 267 | `(make-directory ,(var "bbdb/") t)) |
260 | 268 | (setq bbdb-file (var "bbdb/bbdb.el")) |
319 | 327 | `(make-directory ,(var "jabber/history/") t)) |
320 | 328 | (setq keyfreq-file (var "keyfreq.el")) |
321 | 329 | (setq keyfreq-file-lock (var "keyfreq.lock")) |
322 | (eval-after-load 'lookup | |
323 | `(make-directory ,(etc "lookup/") t)) | |
324 | 330 | (setq libbcel-oauth-store-filename (var "libbcel-oauth-store.el.gpg")) |
325 | 331 | (setq litable-list-file (var "litable-list.el")) |
326 | 332 | (setq logview-cache-filename (var "logview-cache")) |
327 | 333 | (setq logview-views-file (etc "logview-views")) |
334 | (eval-after-load 'lookup | |
335 | `(make-directory ,(etc "lookup/") t)) | |
328 | 336 | (setq lookup-init-directory (etc "lookup/")) |
329 | 337 | (setq lsp-python-ms-dir (var "lsp-python-ms/")) |
330 | (setq lsp-session-file (var "lsp-session.el")) | |
338 | (eval-after-load 'lsp-mode | |
339 | `(make-directory ,(var "lsp/") t)) | |
340 | (setq lsp-server-install-dir (var "lsp/server/")) | |
341 | (setq lsp-session-file (var "lsp/session.el")) | |
331 | 342 | (setq lsp-java-workspace-dir (var "lsp-java/workspace/")) |
332 | 343 | (setq lsp-java-server-install-dir (var "lsp-java/eclipse.jdt.ls/server/")) |
333 | 344 | (setq magithub-dir (var "magithub/")) |
377 | 388 | (setq transient-values-file (etc "transient/values.el")) |
378 | 389 | (setq treemacs-persist-file (var "treemacs/persist.org")) |
379 | 390 | (setq treemacs-last-error-persist-file (var "treemacs/persist-last-error.org")) |
391 | (setq type-break-file-name (var "type-break.el")) | |
392 | (setq undo-fu-session-directory (var "undo-fu-session/")) | |
393 | (setq undohist-directory (var "undohist/")) | |
380 | 394 | (setq undo-tree-history-directory-alist (list (cons "." (var "undo-tree-hist/")))) |
381 | 395 | (setq user-emacs-ensime-directory (var "ensime/")) |
382 | 396 | (setq vimish-fold-dir (var "vimish-fold/")) |