gistfile1.scm

;;;
;;; This part is in ~/.emacs.local
;;;
;;; You can load it in your .emacs with this:
;;;  (load "~/.emacs.local" t)

;; Erlang
(add-to-list 'load-path "/usr/local/lib/erlang/lib/tools-2.6.1/emacs")
(setq erlang-root-dir "/usr/local/lib/erlang")

;; Distel
(add-to-list 'load-path "/Users/samuel/Projects/distel/elisp")
(when (require-no-error 'distel)
  (distel-setup))

;;;
;;; This is in .emacs
;;;

(defun require-no-error (package)
  "This is Ted O'Connor's non-erroring version of (require PACKAGE)."
  (condition-case nil (require package) (error nil)))

;;; erlang-mode
(when (and (require-no-error 'erlang-start)
           (require-no-error 'erlang))
  (setq erlang-indent-level 2)
  (let* ((mnesia-dir (concat (expand-file-name "~/.emacs.d/") "mnesia"))
         (quoted-mnesia-dir (concat "\"" mnesia-dir "\""))
         (options (list "-sname" "emacs" "-mnesia" "dir" quoted-mnesia-dir)))
    (setq inferior-erlang-machine-options options)))