Merge configuration sections on constants and path settings
This commit is contained in:
parent
3fb7c80312
commit
cb9ef5a8d4
25
init.el
25
init.el
|
@ -20,7 +20,7 @@
|
|||
;;; Code:
|
||||
|
||||
|
||||
;; * Constants
|
||||
;; * Preliminaries (constants and path settings)
|
||||
|
||||
(defconst emacs-d (file-name-directory
|
||||
(file-chase-links load-file-name))
|
||||
|
@ -29,6 +29,16 @@
|
|||
(defconst on-windows (memq system-type '(windows-nt cygwin))
|
||||
"Non-nil if and only if this instance of Emacs runs on Windows.")
|
||||
|
||||
(setq custom-file (expand-file-name "private/custom.el" emacs-d)
|
||||
custom-theme-directory (expand-file-name "themes/" emacs-d))
|
||||
|
||||
(add-to-list 'load-path (expand-file-name "site-lisp" emacs-d))
|
||||
|
||||
;; Ensure that ~/.emacs.d/private exists, because we want to store data there
|
||||
(let ((private-data-dir (expand-file-name "private/" emacs-d)))
|
||||
(unless (file-directory-p private-data-dir)
|
||||
(make-directory private-data-dir)))
|
||||
|
||||
|
||||
;; * Packages
|
||||
|
||||
|
@ -55,19 +65,6 @@
|
|||
|
||||
(put 'use-package 'lisp-indent-function 1)
|
||||
|
||||
|
||||
;; * Paths
|
||||
|
||||
(setq custom-file (expand-file-name "private/custom.el" emacs-d)
|
||||
custom-theme-directory (expand-file-name "themes/" emacs-d))
|
||||
|
||||
(add-to-list 'load-path (expand-file-name "site-lisp" emacs-d))
|
||||
|
||||
;; Ensure that ~/.emacs.d/private exists, because we want to store data there
|
||||
(let ((private-data-dir (expand-file-name "private/" emacs-d)))
|
||||
(unless (file-directory-p private-data-dir)
|
||||
(make-directory private-data-dir)))
|
||||
|
||||
|
||||
;; * Mode activation
|
||||
|
||||
|
|
Loading…
Reference in New Issue