Fix whitespace errors

This commit is contained in:
Tuncer Ayaz 2012-01-17 11:55:07 +01:00
parent e6caab00d5
commit 2cae2950c4
3 changed files with 20 additions and 20 deletions

View file

@ -157,7 +157,7 @@ needs_compile(Source, Target, Config) ->
referenced_dtls(Source, Config) -> referenced_dtls(Source, Config) ->
Set = referenced_dtls1([Source], Config, Set = referenced_dtls1([Source], Config,
sets:add_element(Source, sets:new())), sets:add_element(Source, sets:new())),
sets:to_list(sets:del_element(Source, Set)). sets:to_list(sets:del_element(Source, Set)).
referenced_dtls1(Step, Config, Seen) -> referenced_dtls1(Step, Config, Seen) ->

View file

@ -49,16 +49,16 @@ compile_lfe(Source, _Target, Config) ->
case code:which(lfe_comp) of case code:which(lfe_comp) of
non_existing -> non_existing ->
?ERROR(<< ?ERROR(<<
"~n" "~n"
"*** MISSING LFE COMPILER ***~n" "*** MISSING LFE COMPILER ***~n"
" You must do one of the following:~n" " You must do one of the following:~n"
" a) Install LFE globally in your erl libs~n" " a) Install LFE globally in your erl libs~n"
" b) Add LFE as a dep for your project, eg:~n" " b) Add LFE as a dep for your project, eg:~n"
" {lfe, \"0.6.1\",~n" " {lfe, \"0.6.1\",~n"
" {git, \"git://github.com/rvirding/lfe\",~n" " {git, \"git://github.com/rvirding/lfe\",~n"
" {tag, \"v0.6.1\"}}}~n" " {tag, \"v0.6.1\"}}}~n"
"~n" "~n"
>>, []), >>, []),
?FAIL; ?FAIL;
_ -> _ ->
Opts = [{i, "include"}, {outdir, "ebin"}, report] Opts = [{i, "include"}, {outdir, "ebin"}, report]

View file

@ -49,22 +49,22 @@
%% ============================================================================ %% ============================================================================
compile(Config, _AppFile) -> compile(Config, _AppFile) ->
NeoOpts = neotoma_opts(Config), NeoOpts = neotoma_opts(Config),
rebar_base_compiler:run(Config, [], rebar_base_compiler:run(Config, [],
option(doc_root, NeoOpts), ".peg", option(doc_root, NeoOpts), ".peg",
option(out_dir, NeoOpts), option(out_dir, NeoOpts),
option(module_ext, NeoOpts) ++ ".beam", option(module_ext, NeoOpts) ++ ".beam",
fun compile_neo/3, [{check_last_mod,false}]). fun compile_neo/3, [{check_last_mod,false}]).
%% ============================================================================ %% ============================================================================
%% Public API %% Public API
%% ============================================================================ %% ============================================================================
neotoma_opts(Config) -> neotoma_opts(Config) ->
rebar_config:get(Config, neotoma_opts, []). rebar_config:get(Config, neotoma_opts, []).
option(Opt, Options) -> option(Opt, Options) ->
proplists:get_value(Opt, Options, default(Opt)). proplists:get_value(Opt, Options, default(Opt)).
default(doc_root) -> "src"; default(doc_root) -> "src";
default(out_dir) -> "src"; default(out_dir) -> "src";
@ -116,7 +116,7 @@ needs_compile(Source, Target, Config) ->
referenced_pegs(Source, Config) -> referenced_pegs(Source, Config) ->
Set = referenced_pegs1([Source], Config, Set = referenced_pegs1([Source], Config,
sets:add_element(Source, sets:new())), sets:add_element(Source, sets:new())),
sets:to_list(sets:del_element(Source, Set)). sets:to_list(sets:del_element(Source, Set)).
referenced_pegs1(Step, Config, Seen) -> referenced_pegs1(Step, Config, Seen) ->