Skip to content

Instantly share code, notes, and snippets.

@onlyshk
Created February 9, 2012 05:40
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save onlyshk/1777640 to your computer and use it in GitHub Desktop.
Save onlyshk/1777640 to your computer and use it in GitHub Desktop.
(setq load-path (cons "/usr/local/lib/erlang/lib/tools-2.6.6.5/emacs"
load-path))
(setq exec-path (cons "/usr/local/lib/erlang/bin" exec-path))
(add-to-list 'auto-mode-alist '("\\.erl?$" . erlang-mode))
(add-to-list 'auto-mode-alist '("\\.hrl?$" . erlang-mode))
(setq erlang-root-dir "/usr/local/lib/erlang/")
(add-to-list 'exec-path "/usr/local/lib/erlang/bin")
(setq erlang-man-root-dir "/usr/local/lib/erlang/man")
(defun my-erlang-mode-hook ()
(setq inferior-erlang-machine-options '("-sname" "emacs"))
(imenu-add-to-menubar "imenu")
(local-set-key [return] 'newline-and-indent)
(set-frame-height (selected-frame) 20))
(defun erl-shell (flags)
"Start an erlang shell with flags"
(interactive (list (read-string "Flags: ")))
(set 'inferior-erlang-machine-options (split-string flags))
(set-frame-height 5)
(erlang-shell))
(add-hook 'erlang-mode-hook 'my-erlang-mode-hook)
(require 'erlang-start)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment