jt/emacs-prelude
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

made prelude-dir relative to the location of Prelude's init.el

Browse source
This commit is contained in:
Bozhidar Batsov 2011-10-11 22:21:31 +03:00
parent 13ce41a3e3
commit 29ca3b99c4
3 changed files with 7 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
init.el
View file

@ -38,13 +38,15 @@
(if (string= system-type "darwin") (if (string= system-type "darwin")
(push "/usr/local/bin" exec-path)) (push "/usr/local/bin" exec-path))
(defvar prelude-modules-dir (concat user-emacs-directory "modules/") (defvar prelude-dir (file-name-directory load-file-name)
"The root dir of the Emacs Prelude distribution.")
(defvar prelude-modules-dir (concat prelude-dir "modules/")
"This directory houses all of the built-in Prelude module. You should "This directory houses all of the built-in Prelude module. You should
avoid modifying the configuration there.") avoid modifying the configuration there.")
(defvar prelude-vendor-dir (concat user-emacs-directory "vendor/") (defvar prelude-vendor-dir (concat prelude-dir "vendor/")
"This directory house Emacs Lisp packages that are not yet available in "This directory house Emacs Lisp packages that are not yet available in
ELPA (or Marmalade).") ELPA (or Marmalade).")
(defvar prelude-personal-dir (concat user-emacs-directory "personal/") (defvar prelude-personal-dir (concat prelude-dir "personal/")
"Users of Emacs Prelude are encouraged to keep their personal configuration "Users of Emacs Prelude are encouraged to keep their personal configuration
changes in this directory. All Emacs Lisp files there are loaded automatically changes in this directory. All Emacs Lisp files there are loaded automatically
by Prelude.") by Prelude.")

2
modules/prelude-core.el
View file

@ -348,7 +348,7 @@ there's a region, all lines that region covers will be duplicated."
(defun prelude-recompile-init () (defun prelude-recompile-init ()
"Byte-compile all your dotfiles again." "Byte-compile all your dotfiles again."
(interactive) (interactive)
(byte-recompile-directory user-emacs-directory 0) (byte-recompile-directory prelude-dir 0)
(byte-recompile-directory prelude-vendor-dir 0)) (byte-recompile-directory prelude-vendor-dir 0))
(defun prelude-regen-autoloads (&optional force-regen) (defun prelude-regen-autoloads (&optional force-regen)

2
modules/prelude-ui.el
View file

@ -59,7 +59,7 @@
(fset 'yes-or-no-p 'y-or-n-p) (fset 'yes-or-no-p 'y-or-n-p)
;; custom Emacs 24 color themes support ;; custom Emacs 24 color themes support
(add-to-list 'custom-theme-load-path (concat user-emacs-directory "themes/")) (add-to-list 'custom-theme-load-path (concat prelude-dir "themes/"))
(load-theme 'zenburn t) (load-theme 'zenburn t)
(provide 'prelude-ui) (provide 'prelude-ui)