summaryrefslogtreecommitdiff
path: root/lib/megaco
diff options
context:
space:
mode:
authorMicael Karlberg <bmk@erlang.org>2021-05-12 10:00:01 +0200
committerMicael Karlberg <bmk@erlang.org>2021-05-12 14:16:33 +0200
commit3417575e70707d8b0c5abab103306096a5f8eec8 (patch)
treebd7b31488b89d828dfbe3181d13541d15fe97eed /lib/megaco
parentb56a2c4a9f382b37bc457221b3035d46f1e54702 (diff)
downloaderlang-3417575e70707d8b0c5abab103306096a5f8eec8.tar.gz
[megaco|test] Add a skip clause for another linux version
We get random failures in the timer suite on some *old* VMs. So add a general skip (easier than special handle this specific suite).
Diffstat (limited to 'lib/megaco')
-rw-r--r--lib/megaco/test/megaco_test_lib.erl12
1 files changed, 11 insertions, 1 deletions
diff --git a/lib/megaco/test/megaco_test_lib.erl b/lib/megaco/test/megaco_test_lib.erl
index a04b27a061..10e7ed90c8 100644
--- a/lib/megaco/test/megaco_test_lib.erl
+++ b/lib/megaco/test/megaco_test_lib.erl
@@ -1,7 +1,7 @@
%%
%% %CopyrightBegin%
%%
-%% Copyright Ericsson AB 1999-2020. All Rights Reserved.
+%% Copyright Ericsson AB 1999-2021. All Rights Reserved.
%%
%% Licensed under the Apache License, Version 2.0 (the "License");
%% you may not use this file except in compliance with the License.
@@ -524,6 +524,16 @@ maybe_skip(_HostInfo) ->
_ ->
false
end;
+ (V) when (V =:= {2,6,16}) ->
+ case string:trim(os:cmd("cat /etc/issue")) of
+ %% Stone age SLES => Skip
+ %% We have atleast one VM that has this version,
+ %% and it causes randome timeout glitches...
+ "Welcome to SUSE Linux Enterprise Server 10 SP1 " ++ _ ->
+ true;
+ _ ->
+ false
+ end;
(V) when (V =:= {2,6,10}) ->
case string:trim(os:cmd("cat /etc/issue")) of
"MontaVista" ++ _ -> % Stone age MontaVista => Skip