[Init] Move constants to top
This commit is contained in:
parent
2799557f9d
commit
1240abfff0
11
init.el
11
init.el
|
@ -17,12 +17,18 @@
|
||||||
;;; Code:
|
;;; Code:
|
||||||
|
|
||||||
|
|
||||||
;; * Packages
|
;; * Constants
|
||||||
|
|
||||||
(defconst emacs-d (file-name-directory
|
(defconst emacs-d (file-name-directory
|
||||||
(file-chase-links load-file-name))
|
(file-chase-links load-file-name))
|
||||||
"The giant turtle on which the world rests.")
|
"The giant turtle on which the world rests.")
|
||||||
|
|
||||||
|
(defconst on-windows (memq system-type '(windows-nt cygwin))
|
||||||
|
"Non-nil if and only if this instance of Emacs runs on Windows.")
|
||||||
|
|
||||||
|
|
||||||
|
;; * Packages
|
||||||
|
|
||||||
(require 'package)
|
(require 'package)
|
||||||
|
|
||||||
(setq package-user-dir (expand-file-name "elpa" emacs-d))
|
(setq package-user-dir (expand-file-name "elpa" emacs-d))
|
||||||
|
@ -319,9 +325,6 @@ _h_ _l_ _o_k _y_ank
|
||||||
:group 'help
|
:group 'help
|
||||||
:tag "Personal settings")
|
:tag "Personal settings")
|
||||||
|
|
||||||
(defconst on-windows (memq system-type '(windows-nt cygwin))
|
|
||||||
"Non-nil if and only if this instance of Emacs runs on Windows.")
|
|
||||||
|
|
||||||
|
|
||||||
;; * Builtin Variables
|
;; * Builtin Variables
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue