summaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authorTuncer Ayaz <tuncer.ayaz@gmail.com>2014-07-13 14:37:01 +0200
committerTuncer Ayaz <tuncer.ayaz@gmail.com>2014-11-25 18:44:21 +0100
commita4c5f3357f00c7b9c6b232f38c4d9fbc8692dfab (patch)
tree4bc4a78a56a15d0270d7fbb5f350eebd58cec083 /test
parent899d60cdb0e9238cff954add30c2f27e3644e0be (diff)
downloadrebar-a4c5f3357f00c7b9c6b232f38c4d9fbc8692dfab.tar.gz
Treat vsn mismatch as warning if -k/--keep-going
Fixes #319.
Diffstat (limited to 'test')
-rw-r--r--test/rebar_require_vsn_tests.erl29
1 files changed, 16 insertions, 13 deletions
diff --git a/test/rebar_require_vsn_tests.erl b/test/rebar_require_vsn_tests.erl
index 2d3a1ec..ac0e85e 100644
--- a/test/rebar_require_vsn_tests.erl
+++ b/test/rebar_require_vsn_tests.erl
@@ -6,18 +6,21 @@
version_tuple_test_() ->
[%% typical cases
- ?_assert(rebar_require_vsn:version_tuple("R15B", "eunit") =:= {15, 0}),
- ?_assert(rebar_require_vsn:version_tuple("R15B01", "eunit") =:= {15, 1}),
- ?_assert(rebar_require_vsn:version_tuple("R15B02", "eunit") =:= {15, 2}),
- ?_assert(rebar_require_vsn:version_tuple("R15B03-1", "eunit") =:= {15, 3}),
- ?_assert(rebar_require_vsn:version_tuple("R15B03", "eunit") =:= {15, 3}),
- ?_assert(rebar_require_vsn:version_tuple("R16B", "eunit") =:= {16, 0}),
- ?_assert(rebar_require_vsn:version_tuple("R16B01", "eunit") =:= {16, 1}),
- ?_assert(rebar_require_vsn:version_tuple("R16B02", "eunit") =:= {16, 2}),
- ?_assert(rebar_require_vsn:version_tuple("R16B03", "eunit") =:= {16, 3}),
- ?_assert(rebar_require_vsn:version_tuple("R16B03-1", "eunit") =:= {16, 3}),
- ?_assert(rebar_require_vsn:version_tuple("17", "eunit") =:= {17, 0}),
+ ?_assert(check("R15B", "eunit") =:= {15, 0}),
+ ?_assert(check("R15B01", "eunit") =:= {15, 1}),
+ ?_assert(check("R15B02", "eunit") =:= {15, 2}),
+ ?_assert(check("R15B03-1", "eunit") =:= {15, 3}),
+ ?_assert(check("R15B03", "eunit") =:= {15, 3}),
+ ?_assert(check("R16B", "eunit") =:= {16, 0}),
+ ?_assert(check("R16B01", "eunit") =:= {16, 1}),
+ ?_assert(check("R16B02", "eunit") =:= {16, 2}),
+ ?_assert(check("R16B03", "eunit") =:= {16, 3}),
+ ?_assert(check("R16B03-1", "eunit") =:= {16, 3}),
+ ?_assert(check("17", "eunit") =:= {17, 0}),
%% error cases
- ?_assertException(throw, rebar_abort, rebar_require_vsn:version_tuple("", "eunit")),
- ?_assertException(throw, rebar_abort, rebar_require_vsn:version_tuple("abc", "eunit"))
+ ?_assertException(throw, rebar_abort, check("", "eunit")),
+ ?_assertException(throw, rebar_abort, check("abc", "eunit"))
].
+
+check(OtpRelease, Type) ->
+ rebar_require_vsn:version_tuple(abort, OtpRelease, Type).