--- a/.emacs	Thu Jan 28 21:30:40 2010 +0200
+++ b/.emacs	Thu Jan 28 21:31:18 2010 +0200
@@ -11,8 +11,14 @@
 (defvar my-usr-el-dir
   (expand-file-name "~/usr/share/emacs/site-lisp")
   "Here live additional lisp packages.")
-(add-to-list 'load-path my-usr-el-dir)
+(add-to-list 'load-path my-usr-el-dir t)
+(defvar my-lisp-dir
+  (expand-file-name "~/.emacs.d/my-lisp")
+  "Here live my lisp packages.")
+(add-to-list 'load-path my-lisp-dir t)
 
+(defvar my-autoload (concat my-lisp-dir "/autoload-my.el")
+  "Path to autoload for mode files.")
 (defvar dot-emacs-pre (expand-file-name "~/.emacs-pre")
   "Path to file with pre-loaded custom settings.")
 (defvar dot-emacs-post (expand-file-name "~/.emacs-post")
@@ -24,6 +30,9 @@
 (if (file-exists-p dot-emacs-pre)
     (load dot-emacs-pre))
 
+(if (file-exists-p my-autoload)
+    (load my-autoload))
+
 ;; load main customization
 (load "~/.emacs-my")