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

init.el

@@ -38,13 +38,15 @@
 (if (string= system-type "darwin")
     (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
 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
 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
 changes in this directory. All Emacs Lisp files there are loaded automatically
 by Prelude.")

modules/prelude-core.el

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

modules/prelude-ui.el

@@ -59,7 +59,7 @@
 (fset 'yes-or-no-p 'y-or-n-p)
 
 ;; 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)
 
 (provide 'prelude-ui)