summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorHeinz N. Gies <heinz@licenser.net>2015-09-22 02:06:20 +0200
committerHeinz N. Gies <heinz@licenser.net>2015-09-22 02:06:20 +0200
commit6557820cc740748ce15c486a06ea6239101e3b28 (patch)
tree85bd59911f37a146585f24109596f46ae9b7a906
parenta00cc833adc0584b07d795ab8eb92cb16f96d82e (diff)
Remove rebar_colour and replace it with cf
-rw-r--r--rebar.config3
-rw-r--r--rebar.lock1
-rw-r--r--src/rebar_colour.erl101
-rw-r--r--src/rebar_dialyzer_format.erl5
4 files changed, 5 insertions, 105 deletions
diff --git a/rebar.config b/rebar.config
index 7b46ec2..153da26 100644
--- a/rebar.config
+++ b/rebar.config
@@ -7,7 +7,8 @@
{providers, "1.5.0"},
{getopt, "0.8.2"},
{bbmustache, "1.0.4"},
- {relx, "3.6.0"}]}.
+ {relx, "3.6.0"},
+ {cf, "0.1.0"}]}.
{escript_name, rebar3}.
{escript_emu_args, "%%! +sbtu +A0\n"}.
diff --git a/rebar.lock b/rebar.lock
index 96af34f..81ecc15 100644
--- a/rebar.lock
+++ b/rebar.lock
@@ -1,5 +1,6 @@
[{<<"bbmustache">>,{pkg,<<"bbmustache">>,<<"1.0.4">>},0},
{<<"certifi">>,{pkg,<<"certifi">>,<<"0.1.1">>},0},
+ {<<"cf">>,{pkg,<<"cf">>,<<"0.1.0">>},0},
{<<"erlware_commons">>,{pkg,<<"erlware_commons">>,<<"0.16.0">>},0},
{<<"getopt">>,{pkg,<<"getopt">>,<<"0.8.2">>},0},
{<<"providers">>,{pkg,<<"providers">>,<<"1.5.0">>},0},
diff --git a/src/rebar_colour.erl b/src/rebar_colour.erl
deleted file mode 100644
index bff080d..0000000
--- a/src/rebar_colour.erl
+++ /dev/null
@@ -1,101 +0,0 @@
--module(rebar_colour).
-
--export([format/1, format/2]).
-
--define(NR, "\033[0;31m").
--define(NG, "\033[0;32m").
--define(NY, "\033[0;33m").
--define(NB, "\033[0;34m").
--define(NM, "\033[0;35m").
--define(NC, "\033[0;36m").
--define(NW, "\033[0;37m").
--define(BR, "\033[1;31m").
--define(BG, "\033[1;32m").
--define(BY, "\033[1;33m").
--define(BB, "\033[1;34m").
--define(BM, "\033[1;35m").
--define(BC, "\033[1;36m").
--define(BW, "\033[1;37m").
--define(R, "\033[0m").
-
-format(Fmt) ->
- format(Fmt, []).
-format(Fmt, Args) ->
- io_lib:format(cfmt(Fmt), Args).
-
-%% FROM https://github.com/erlware/erlware_commons/blob/49bc69e35a282bde4a0a6a8f211b5f77d8585256/src/ec_cmd_log.erl
-%% @doc Query the term enviroment
-%% For reasons of simplicity, we don't parse terminal capabilities yet, although
-%% a later version could do so. Rather, we provide a simple match-list of terminal
-%% capabilities.
-%% @end
--spec query_term_env() -> full | dumb.
-query_term_env() ->
- term_capabilities(os:getenv("TERM")).
-
--spec term_capabilities(string()) -> full | dumb.
-term_capabilities("xterm") -> full;
-term_capabilities("dumb") -> dumb;
-term_capabilities(_) -> full. %% Default to the backwards compatible version.
-
-
-cfmt(S) ->
- cfmt(S, query_term_env() =:= full).
-
-cfmt(S, Enabled) ->
- lists:flatten(cfmt_(S, ?R, Enabled)).
-
-cfmt_([$~,$!,_C | S], Last, false) ->
- cfmt_(S, Last, false);
-
-cfmt_([$~,$!,$! | S], _Last, Enabled) ->
- [?R | cfmt_(S, ?R, Enabled)];
-
-cfmt_([$~,$!,$r | S], _Last, Enabled) ->
- [?NR | cfmt_(S, ?NR, Enabled)];
-cfmt_([$~,$!,$R | S], _Last, Enabled) ->
- [?BR | cfmt_(S, ?BR, Enabled)];
-
-cfmt_([$~,$!,$g | S], _Last, Enabled) ->
- [?NG | cfmt_(S, ?NG, Enabled)];
-cfmt_([$~,$!,$G | S], _Last, Enabled) ->
- [?BG | cfmt_(S, ?BG, Enabled)];
-
-cfmt_([$~,$!,$y | S], _Last, Enabled) ->
- [?NY | cfmt_(S, ?NY, Enabled)];
-cfmt_([$~,$!,$Y | S], _Last, Enabled) ->
- [?BY | cfmt_(S, ?BY, Enabled)];
-
-cfmt_([$~,$!,$b | S], _Last, Enabled) ->
- [?NB | cfmt_(S, ?NB, Enabled)];
-cfmt_([$~,$!,$B | S], _Last, Enabled) ->
- [?BB | cfmt_(S, ?BB, Enabled)];
-
-cfmt_([$~,$!,$m | S], _Last, Enabled) ->
- [?NM | cfmt_(S, ?NM, Enabled)];
-cfmt_([$~,$!,$M | S], _Last, Enabled) ->
- [?BM | cfmt_(S, ?BM, Enabled)];
-
-cfmt_([$~,$!,$c | S], _Last, Enabled) ->
- [?NC | cfmt_(S, ?NC, Enabled)];
-cfmt_([$~,$!,$C | S], _Last, Enabled) ->
- [?BC | cfmt_(S, ?BC, Enabled)];
-
-cfmt_([$~,$!,$w | S], _Last, Enabled) ->
- [?NW | cfmt_(S, ?NW, Enabled)];
-cfmt_([$~,$!,$W | S], _Last, Enabled) ->
- [?BW | cfmt_(S, ?BW, Enabled)];
-
-cfmt_([$~,$~ | S], Last, Enabled) ->
- [$~,$~ | cfmt_(S, Last, Enabled)];
-
-cfmt_([$~,$s| S], Last, Enabled) ->
- [$~,$s, Last | cfmt_(S, Last, Enabled)];
-
-cfmt_([C | S], Last, Enabled) ->
- [C | cfmt_(S, Last, Enabled)];
-
-cfmt_([], _Last, false) ->
- "";
-cfmt_([], _Last, _Enabled) ->
- ?R.
diff --git a/src/rebar_dialyzer_format.erl b/src/rebar_dialyzer_format.erl
index 9299b1a..d75c914 100644
--- a/src/rebar_dialyzer_format.erl
+++ b/src/rebar_dialyzer_format.erl
@@ -5,7 +5,6 @@
-export([format/1]).
-
format(Warning) ->
Str = try
format_warning(Warning, fullpath)
@@ -26,9 +25,9 @@ strip(Warning) ->
string:strip(Warning, right, $\n).
fmt(Fmt) ->
- rebar_colour:format(Fmt, []).
+ cf:format(Fmt, []).
fmt(Fmt, Args) ->
- rebar_colour:format(Fmt, Args).
+ cf:format(Fmt, Args).
format_warning({Tag, {File, Line, _MFA}, Msg}, FOpt) ->
format_warning({Tag, {File, Line}, Msg}, FOpt);