emacs setup script

initialise-new.el

;;; emacs lisp file to set up kyle's emacs

;;; install package.el
(let ((buffer (url-retrieve-synchronously
	       "http://tromey.com/elpa/package-install.el")))
  (save-excursion
    (set-buffer buffer)
    (goto-char (point-min))
    (re-search-forward "^$" nil 'move)
    (eval-region (point) (point-max))
    (kill-buffer (current-buffer))))

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

; use marmalade as our package repo
(require 'package)
(setq package-archives '("marmalade" . "http://marmalade-repo.org/packages/"))

; this is the list of packages to be installed
(setq initial-package-alist 
      '(erc gist magit javascript mediawiki muse nterm slime-repl twitter w3))

(setq initial-package-alist
      (append initial-package-alist 
	      '(paredit)))

(defun install-package-list (packages)
  "Install a list of packages. Requires package.el and is used in the inital
setup code."
  (while (not (equalp packages nil))
    (package-install (car packages))
    (install-package-list (cdr packages))))

(install-package-list initial-package-alist)

; need to call code to fetch a few other files
; use (shell-command "command")