7e82535bf3
This feels weird to set as default a variable using a third-party service like Dropbox. Was OK when Spacemacs was less popular, now this variable has nothing to do in this project.
74 lines
2.7 KiB
EmacsLisp
74 lines
2.7 KiB
EmacsLisp
;;; core-load-paths.el --- Spacemacs Core File
|
|
;;
|
|
;; Copyright (c) 2012-2016 Sylvain Benner & Contributors
|
|
;;
|
|
;; Author: Sylvain Benner <sylvain.benner@gmail.com>
|
|
;; URL: https://github.com/syl20bnr/spacemacs
|
|
;;
|
|
;; This file is not part of GNU Emacs.
|
|
;;
|
|
;;; License: GPLv3
|
|
(defun add-to-load-path (dir) (add-to-list 'load-path dir))
|
|
|
|
(defun add-to-load-path-if-exists (dir)
|
|
"If DIR exists in the file system, add it to `load-path'."
|
|
(when (file-exists-p dir)
|
|
(add-to-load-path dir)))
|
|
|
|
;; paths
|
|
(defvar spacemacs-start-directory
|
|
user-emacs-directory
|
|
"Spacemacs start directory.")
|
|
(defconst spacemacs-core-directory
|
|
(expand-file-name (concat spacemacs-start-directory "core/"))
|
|
"Spacemacs core directory.")
|
|
(defconst spacemacs-info-directory
|
|
(expand-file-name (concat spacemacs-core-directory "info/"))
|
|
"Spacemacs info files directory")
|
|
(defconst spacemacs-release-notes-directory
|
|
(expand-file-name (concat spacemacs-info-directory "release-notes/"))
|
|
"Spacemacs release notes directory")
|
|
(defconst spacemacs-banner-directory
|
|
(expand-file-name (concat spacemacs-core-directory "banners/"))
|
|
"Spacemacs banners directory.")
|
|
(defconst spacemacs-banner-official-png
|
|
(expand-file-name (concat spacemacs-banner-directory "img/spacemacs.png"))
|
|
"Spacemacs official banner image.")
|
|
(defconst spacemacs-badge-official-png
|
|
(expand-file-name (concat spacemacs-banner-directory
|
|
"img/spacemacs-badge.png"))
|
|
"Spacemacs official badge image.")
|
|
(defconst spacemacs-purple-heart-png
|
|
(expand-file-name (concat spacemacs-banner-directory "img/heart.png"))
|
|
"Purple heart emoji.")
|
|
(defconst spacemacs-cache-directory
|
|
(expand-file-name (concat user-emacs-directory ".cache/"))
|
|
"Spacemacs storage area for persistent files")
|
|
(defconst spacemacs-auto-save-directory
|
|
(expand-file-name (concat spacemacs-cache-directory "auto-save/"))
|
|
"Spacemacs auto-save directory")
|
|
(defconst spacemacs-docs-directory
|
|
(expand-file-name (concat spacemacs-start-directory "doc/"))
|
|
"Spacemacs documentation directory.")
|
|
(defconst spacemacs-assets-directory
|
|
(expand-file-name (concat spacemacs-start-directory "assets/"))
|
|
"Spacemacs assets directory.")
|
|
(defconst spacemacs-test-directory
|
|
(expand-file-name (concat spacemacs-start-directory "tests/"))
|
|
"Spacemacs tests directory.")
|
|
|
|
(defconst user-home-directory
|
|
(expand-file-name "~/")
|
|
"User home directory (~/).")
|
|
(defconst pcache-directory
|
|
(concat spacemacs-cache-directory "pcache/"))
|
|
(unless (file-exists-p spacemacs-cache-directory)
|
|
(make-directory spacemacs-cache-directory))
|
|
|
|
;; load paths
|
|
(mapc 'add-to-load-path
|
|
`(
|
|
,(concat spacemacs-start-directory "core/")
|
|
,(concat spacemacs-start-directory "core/libs/")
|
|
,(concat spacemacs-start-directory "core/aprilfool/")
|
|
))
|