(defvar *emacs-load-start* (current-time))

(setq custom-file "~/.emacs-custom.el")
(load custom-file 'noerror)

(setq debian-emacs-flavor 'emacs23)

;; Common lisp compatibility
(require 'cl)

;; Must be first to load
(load "~/emacs/emacs-rc/helpers.el")

(add-to-list 'load-path "~/.emacs.d")

(add-to-list 'load-path "~/elisp")
(add-to-list 'load-path "~/elisp/ecb")
(add-to-list 'load-path "~/elisp/cedet")
(add-to-list 'load-path "~/elisp/emacs-jabber")
(add-to-list 'load-path "~/elisp/yasnippet")
(add-to-list 'load-path "~/elisp/haskell-mode")
(add-to-list 'load-path "~/elisp/emms/")
(add-to-list 'load-path "~/elisp/color-theme")
(add-to-list 'load-path "~/elisp/http-emacs")
(add-to-list 'load-path "~/elisp/ljupdate")
(add-to-list 'load-path "~/elisp/muse")

(safe-load "~/emacs/emacs-rc/features.el")
(safe-load "~/emacs/emacs-rc/devel.el")
(safe-load "~/emacs/emacs-rc/www-stuff.el")
(safe-load "~/emacs/emacs-rc/mytramp.el")
(safe-load "~/emacs/emacs-rc/my-muse.el")

(require 'gnus)

;; Starting emacs server, so we can connect to it with commands: emacsclient -t/-c
(server-start)

(message "Emacs loaded in %ds" (destructuring-bind (hi lo ms) (current-time)
                             (- (+ hi lo) (+ (first *emacs-load-start*) (second *emacs-load-start*)))))
(message "Happy hacking, %s!" (user-login-name))