From 5b4684f3356b0394925b2f783e5e98f0632012c1 Mon Sep 17 00:00:00 2001
From: Tom Willemsen
Date: Thu, 3 Jan 2013 23:55:57 +0100
Subject: Emacs: Start with literate configuration again

---
 .emacs.d/init.el | 40 +---------------------------------------
 1 file changed, 1 insertion(+), 39 deletions(-)

(limited to '.emacs.d/init.el')

diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index d1e8c50..e0e73f1 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -6,45 +6,7 @@
 
 ;;; Code:
 
-(eval-and-compile
-  (package-initialize)
-
-  (mapc #'(lambda (directory)
-            (add-to-list 'load-path directory)
-            (let ((default-directory directory))
-              (normal-top-level-add-subdirs-to-load-path)))
-        '("/usr/share/emacs/site-lisp" "~/.emacs.d/site-lisp"
-          "/usr/local/emacs/share/emacs/site-lisp"))
-  (mapc #'(lambda (directory)
-            (add-to-list 'load-path directory)
-            (let ((loaddefs (concat directory "/loaddefs.el")))
-              (when (file-exists-p loaddefs)
-                (load loaddefs))))
-        '("~/var/src/emacs/dispass.el" "~/var/src/emacs/mode-icons"))
-  (mapc #'(lambda (dir)
-            (add-to-list 'custom-theme-load-path dir))
-        '("~/var/src/emacs/yoshi-theme")))
-
-(require 'auto-complete-config)
-(require 'ext)
-(require 'geiser-install)
-(require 'oni)
-(require 'uniquify)
-
-(autoload 'define-slime-contrib "slime")
-(autoload 'gtags-mode "gtags" nil t)
-(autoload 'jabber-connect "jabber" nil t)
-(autoload 'php-mode "php-mode" nil t)
-(autoload 'po-mode "po-mode" nil t)
-(autoload 'pony-mode "pony-mode" nil t)
-(autoload 'sawfish-mode "sawfish" nil t)
-(autoload 'server-running-p "server")
-(autoload 'slime-js-minor-mode "slime-js" nil t)
-(autoload 'xmodmap-mode "xmodmap-mode" nil t)
-(autoload 'w3m-bookmark-view "w3m" nil t)
-(autoload 'w3m-goto-url "w3m" nil t)
-
-(load (expand-file-name "~/.emacs.d/site-lisp/loaddefs.el"))
+(load (concat user-emacs-directory "init2"))
 
 (define-key key-translation-map (kbd "C-j") (kbd "C-l"))
 (define-key key-translation-map (kbd "C-l") (kbd "C-j"))
-- 
cgit v1.2.3-54-g00ecf