Update ChangeLog, AUTHORS.
[erlware-mode.git] / erlang-start.el
blobf12bb330ddfa9ff9df57667504d32b510268e5ff
1 ;; erlang-start.el --- Load this file to initialize the Erlang package.
3 ;; Copyright (C) 1998 Ericsson Telecom AB
5 ;; Author: Anders Lindgren
6 ;; Version: 2.3
7 ;; Keywords: erlang, languages, processes
8 ;; Created: 1996-09-18
9 ;; Date: 1998-03-16
11 ;;; Commentary:
13 ;; Introduction:
14 ;; ------------
16 ;; This package provides support for the programming language Erlang.
17 ;; The package provides an editing mode with lots of bells and
18 ;; whistles, compilation support, and it makes it possible for the
19 ;; user to start Erlang shells that run inside Emacs.
21 ;; See the Erlang distribution for full documentation of this package.
23 ;; Installation:
24 ;; ------------
26 ;; Place this file in Emacs load path, byte-compile it, and add the
27 ;; following line to the appropriate init file:
29 ;; (require 'erlang-start)
31 ;; The full documentation contains much more extensive description of
32 ;; the installation procedure.
34 ;; Reporting Bugs:
35 ;; --------------
37 ;; Please send bug reports to the following email address:
38 ;; support@erlang.ericsson.se
40 ;; Please state as exactly as possible:
41 ;; - Version number of Erlang Mode (see the menu), Emacs, Erlang,
42 ;; and of any other relevant software.
43 ;; - What the expected result was.
44 ;; - What you did, preferably in a repeatable step-by-step form.
45 ;; - A description of the unexpected result.
46 ;; - Relevant pieces of Erlang code causing the problem.
47 ;; - Personal Emacs customisations, if any.
49 ;; Should the Emacs generate an error, please set the emacs variable
50 ;; `debug-on-error' to `t'. Repeat the error and enclose the debug
51 ;; information in your bug-report.
53 ;; To set the variable you can use the following command:
54 ;; M-x set-variable RET debug-on-error RET t RET
56 ;;; Code:
59 ;; Declare functions in "erlang.el".
62 (autoload 'erlang-mode "erlang" "Major mode for editing Erlang code." t)
63 (autoload 'erlang-version "erlang"
64 "Return the current version of Erlang mode." t)
65 (autoload 'erlang-shell "erlang" "Start a new Erlang shell." t)
66 (autoload 'run-erlang "erlang" "Start a new Erlang shell." t)
68 (autoload 'erlang-compile "erlang"
69 "Compile Erlang module in current buffer." t)
71 (autoload 'erlang-man-module "erlang"
72 "Find manual page for MODULE." t)
73 (autoload 'erlang-man-function "erlang"
74 "Find manual page for NAME, where NAME is module:function." t)
76 (autoload 'erlang-find-tag "erlang"
77 "Like `find-tag'. Capable of retreiving Erlang modules.")
78 (autoload 'erlang-find-tag-other-window "erlang"
79 "Like `find-tag-other-window'. Capable of retreiving Erlang modules.")
83 ;; Associate files extensions ".erl" and ".hrl" with Erlang mode.
86 (let ((a '("\\.erl\\'" . erlang-mode))
87 (b '("\\.hrl\\'" . erlang-mode)))
88 (or (assoc (car a) auto-mode-alist)
89 (setq auto-mode-alist (cons a auto-mode-alist)))
90 (or (assoc (car b) auto-mode-alist)
91 (setq auto-mode-alist (cons b auto-mode-alist))))
94 ;; Associate files using interpreter "escript" with Erlang mode.
95 ;;
97 (add-to-list 'interpreter-mode-alist (cons "escript" 'erlang-mode))
100 ;; Ignore files ending in ".jam", ".vee", and ".beam" when performing
101 ;; file completion.
104 (let ((erl-ext '(".jam" ".vee" ".beam")))
105 (while erl-ext
106 (let ((cie completion-ignored-extensions))
107 (while (and cie (not (string-equal (car cie) (car erl-ext))))
108 (setq cie (cdr cie)))
109 (if (null cie)
110 (setq completion-ignored-extensions
111 (cons (car erl-ext) completion-ignored-extensions))))
112 (setq erl-ext (cdr erl-ext))))
116 ;; The end.
119 (provide 'erlang-start)
121 ;; erlang-start.el ends here.