55 lines
1.9 KiB
EmacsLisp
55 lines
1.9 KiB
EmacsLisp
;; spacemacs special buffer
|
|
(defconst spacemacs-core-directory
|
|
(expand-file-name (concat user-emacs-directory "core/"))
|
|
"Spacemacs core directory.")
|
|
(add-to-list 'load-path spacemacs-core-directory)
|
|
(require 'config-system)
|
|
(load (concat spacemacs-core-directory "spacemacs-mode.el"))
|
|
(spacemacs/buffer)
|
|
|
|
(defgroup spacemacs nil
|
|
"Spacemacs customizations."
|
|
:group 'starter-kit
|
|
:prefix 'spacemacs-)
|
|
|
|
(unless (not (spacemacs/emacs-version-ok))
|
|
;; additional paths
|
|
(defconst user-home-directory
|
|
(expand-file-name (concat user-emacs-directory "../"))
|
|
"User home directory (~/).")
|
|
(defconst spacemacs-directory
|
|
(expand-file-name (concat user-emacs-directory "spacemacs/"))
|
|
"Spacemacs base directory.")
|
|
(defconst spacemacs-cache-directory
|
|
(expand-file-name (concat user-emacs-directory ".cache/"))
|
|
"Spacemacs storage area for persistent files.")
|
|
(if (not (file-exists-p spacemacs-cache-directory))
|
|
(make-directory spacemacs-cache-directory))
|
|
(defconst user-dropbox-directory
|
|
(expand-file-name (concat user-home-directory "Dropbox/"))
|
|
"Dropbox directory.")
|
|
;; if you have a dropbox, then ~/Dropbox/emacs is added to load path
|
|
(add-to-list 'load-path (concat user-dropbox-directory "emacs/"))
|
|
|
|
(config-system/package.el-initialize)
|
|
|
|
;; Initializing configuration from ~/.spacemacs
|
|
(dotspacemacs/load)
|
|
(dotspacemacs|call-func dotspacemacs/init)
|
|
|
|
;; Load configuration layers
|
|
(config-system/declare-layer 'spacemacs)
|
|
(config-system/declare-dotspacemacs-configuration-layers)
|
|
(config-system/load-layers)
|
|
(config-system/delete-orphan-packages)
|
|
|
|
;; Ultimate configuration decisions are given to the user who can defined
|
|
;; them in his/her ~/.spacemacs file
|
|
(dotspacemacs|call-func dotspacemacs/config)
|
|
(config-system/setup-after-init-hook)
|
|
|
|
;; start a server for subsequent emacs clients
|
|
(require 'server)
|
|
(unless (server-running-p)
|
|
(server-start)))
|