--- a/.emacs	Tue Jan 27 22:28:18 2015 +0200
+++ b/.emacs	Tue Jan 27 22:53:39 2015 +0200
@@ -27,7 +27,7 @@
 (my-add-subdirs-to-load-path my-usr-el-dir)
 
 (defvar my-lisp-dir
-  (expand-file-name "~/.emacs.d/my-lisp")
+  (expand-file-name (concat user-emacs-directory "my-lisp"))
   "Here live my lisp packages.")
 (my-add-subdirs-to-load-path my-lisp-dir)