emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

defconst -> defvar for global constants

Browse source 
So they can be changed prior to being defined (e.g. for
doom/open-vanilla-sandbox).
This commit is contained in:
Henrik Lissner 2018-08-12 02:45:28 +02:00
parent c530866f0a
commit 36044fccc9
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
1 changed files with 11 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

22
core/core.el
View file

@ -28,39 +28,39 @@ line or use --debug-init to enable this.")
;; ;;
(defconst doom-emacs-dir (defvar doom-emacs-dir
(eval-when-compile (file-truename user-emacs-directory)) (eval-when-compile (file-truename user-emacs-directory))
"The path to this emacs.d directory. Must end in a slash.") "The path to this emacs.d directory. Must end in a slash.")
(defconst doom-core-dir (concat doom-emacs-dir "core/") (defvar doom-core-dir (concat doom-emacs-dir "core/")
"Where essential files are stored.") "Where essential files are stored.")
(defconst doom-modules-dir (concat doom-emacs-dir "modules/") (defvar doom-modules-dir (concat doom-emacs-dir "modules/")
"The main directory where Doom modules are stored.") "The main directory where Doom modules are stored.")
(defconst doom-local-dir (concat doom-emacs-dir ".local/") (defvar doom-local-dir (concat doom-emacs-dir ".local/")
"Root directory for local Emacs files. Use this as permanent storage for files "Root directory for local Emacs files. Use this as permanent storage for files
that are safe to share across systems (if this config is symlinked across that are safe to share across systems (if this config is symlinked across
several computers).") several computers).")
(defconst doom-etc-dir (concat doom-local-dir "etc/") (defvar doom-etc-dir (concat doom-local-dir "etc/")
"Directory for non-volatile storage. "Directory for non-volatile storage.
Use this for files that don't change much, like servers binaries, external Use this for files that don't change much, like servers binaries, external
dependencies or long-term shared data.") dependencies or long-term shared data.")
(defconst doom-cache-dir (concat doom-local-dir "cache/") (defvar doom-cache-dir (concat doom-local-dir "cache/")
"Directory for volatile storage. "Directory for volatile storage.
Use this for files that change often, like cache files.") Use this for files that change often, like cache files.")
(defconst doom-packages-dir (concat doom-local-dir "packages/") (defvar doom-packages-dir (concat doom-local-dir "packages/")
"Where package.el and quelpa plugins (and their caches) are stored.") "Where package.el and quelpa plugins (and their caches) are stored.")
(defconst doom-docs-dir (concat doom-emacs-dir "docs/") (defvar doom-docs-dir (concat doom-emacs-dir "docs/")
"Where the Doom manual is stored.") "Where the Doom manual is stored.")
(defconst doom-private-dir (defvar doom-private-dir
(eval-when-compile (eval-when-compile
(or (getenv "DOOMDIR") (or (getenv "DOOMDIR")
(let ((xdg-path (let ((xdg-path
@ -72,10 +72,10 @@ Use this for files that change often, like cache files.")
"Where your private customizations are placed. Must end in a slash. Respects "Where your private customizations are placed. Must end in a slash. Respects
XDG directory conventions if ~/.config/doom exists.") XDG directory conventions if ~/.config/doom exists.")
(defconst doom-autoload-file (concat doom-local-dir "autoloads.el") (defvar doom-autoload-file (concat doom-local-dir "autoloads.el")
"Where `doom-reload-doom-autoloads' will generate its core autoloads file.") "Where `doom-reload-doom-autoloads' will generate its core autoloads file.")
(defconst doom-package-autoload-file (concat doom-local-dir "autoloads.pkg.el") (defvar doom-package-autoload-file (concat doom-local-dir "autoloads.pkg.el")
"Where `doom-reload-package-autoloads' will generate its package.el autoloads "Where `doom-reload-package-autoloads' will generate its package.el autoloads
file.") file.")