init.el

;; load paths
(setq dotfiles-dir (file-name-directory
		    (or (buffer-file-name) load-file-name)))
(add-to-list 'load-path dotfiles-dir)
(add-to-list 'load-path (concat dotfiles-dir "/elpa-to-submit"))
(add-to-list 'load-path (concat dotfiles-dir "/elpa-to-submit/color-theme"))
(add-to-list 'load-path (concat dotfiles-dir "/elpa-to-submit/php-mode-1.5.0"))
(add-to-list 'load-path (concat dotfiles-dir "/elpa-to-submit/remember")) 
(add-to-list 'load-path (concat dotfiles-dir "/elpa-to-submit/w3m"))
(add-to-list 'load-path (concat dotfiles-dir "/elpa-to-submit/magit"))

;; exec-path
(add-to-list 'exec-path "~/bin")
(add-to-list 'exec-path "/usr/local/bin")
(add-to-list 'exec-path "/opt/local/bin")

;; server-start (for emacsclient)
(server-start)

;; env variables
(setq autoload-file (concat dotfiles-dir "loaddefs.el"))
(setq package-user-dir (concat dotfiles-dir "elpa"))
(setq custom-file (concat dotfiles-dir "custom.el"))

;; debug debugging (let's hope we don't have to use this...)
;; (setq debug-on-error t)

;; set meta to overlap super on Linux
(if (eq system-type 'gnu/linux)
    (setq x-super-keysym 'meta))

;; emacs cosmetics
(setq inhibit-splash-screen t)
(ansi-color-for-comint-mode-on)

;; package.el
(when
    (load
     (expand-file-name "~/.emacs.d/elpa/package.el"))
  (package-initialize))

;; auto-save
(defvar user-temporary-file-directory
  (concat temporary-file-directory user-login-name "/"))
(make-directory user-temporary-file-directory t)
(setq backup-by-copying t)
(setq backup-directory-alist
      `(("." . ,user-temporary-file-directory)
        (,tramp-file-name-regexp nil)))
(setq auto-save-list-file-prefix
      (concat user-temporary-file-directory ".auto-saves-"))
(setq auto-save-file-name-transforms
      `((".*" ,user-temporary-file-directory t)))

;; we need these every session
(require 'cl)
(require 'saveplace)
(require 'ffap)
(require 'uniquify)
(require 'ansi-color)
(require 'recentf)

;;;###begin my loads and requires###;;;
(require 'flyspell)
(require 'gnus)
(require 'pastie)
(require 'scpaste)
(require 'textmate)
;; (textmate-mode)
(require 'php-mode)
(require 'php-repl)
(require 'conspire)
(require 'shellfm)
(require 'eproject)
(require 'w3m-load)

;; paredit
(require 'paredit)
(autoload 'paredit-mode "paredit"
      "Minor mode for pseudo-structurally editing Lisp code." t)
(add-hook 'emacs-lisp-mode-hook (lambda () (paredit-mode +1)))
(add-hook 'lisp-mode-hook (lambda () (paredit-mode +1)))
(add-hook 'lisp-interaction-mode-hook (lambda () (paredit-mode +1)))
(add-hook 'clojure-mode-hook (lambda () (paredit-mode +1)))
(add-hook 'ruby-mode-hook 'esk-paredit-nonlisp)

;; tramp
(require 'tramp)
(setq tramp-default-method "scp")
(setq recentf-auto-cleanup 'never) ;; disable before we start recentf!
(recentf-mode 1)

;; color-theme
(require 'color-theme)
(eval-after-load "color-theme"
  '(progn
     (color-theme-initialize)
     (color-theme-charcoal-black)))

;; (require 'yasnippet)
;; (yas/load-directory "~/.emacs.d/snippets/")

;; rudel
(add-to-list 'load-path "~/src/rudel/")
(add-to-list 'load-path "~/src/rudel/jupiter/")
(add-to-list 'load-path "~/src/rudel/obby/")
(require 'rudel-mode)
(require 'rudel-obby)
(load-file "~/src/rudel/rudel-loaddefs.el")
(global-rudel-minor-mode 1)

;; custom defn requires
(require 'defn-ruby)
(require 'defn-registers)
(require 'defn-misc)
(require 'defn-defuns)
(require 'defn-shellfm)
(require 'defn-bindings)
(require 'defn-clojure)
(require 'defn-markdown)
(require 'defn-gnus)
(require 'defn-org)



;; autoloads
(regen-autoloads)
(load custom-file 'noerror)

;; You can keep system- or user-specific customizations here
(setq system-specific-config (concat dotfiles-dir system-name ".el")
      user-specific-config (concat dotfiles-dir user-login-name ".el")
      user-specific-dir (concat dotfiles-dir user-login-name))
(add-to-list 'load-path user-specific-dir)

(if (file-exists-p system-specific-config) (load system-specific-config))
(if (file-exists-p user-specific-config) (load user-specific-config))
(if (file-exists-p user-specific-dir)
  (mapc #'load (directory-files user-specific-dir nil ".*el$")))