Start of sinan command support.
[erlware-mode.git] / erlang-sinan.el
blob275a56ec610b7337801a8f4553103a2ce40d3f96
1 ;; erlang-sinan.el --- Functions for launching sinan commands.
3 ;; Author: Dave Peticolas
4 ;; Version: 0.1
5 ;; Keywords: erlang, sinan, erlware
6 ;; Created: 2007-09-18
7 ;; Date: 2008-01-01
10 (require 'compile)
13 (defun erlang-sinan-run-command (command)
14 "Run sinan with the command given as an argument. Runs sinan
15 in a separate process asynchronously with output going to the
16 buffer `*sinan*'."
17 (interactive)
18 (save-some-buffers)
19 (compile-internal command "No more errors." "sinan"))
21 (defun erlang-sinan-build ()
22 (interactive)
23 (erlang-sinan-run-command "sinan"))