diff options
author | Peter Andersson <[email protected]> | 2016-04-29 14:14:26 +0200 |
---|---|---|
committer | Peter Andersson <[email protected]> | 2016-05-02 14:09:46 +0200 |
commit | 6c9fe3aaf3de6b400db4054bc67bf24c4e720861 (patch) | |
tree | 4604ae9bfde705b5a35fea3cf527cf58b4775b7e | |
parent | 44082e24cf0b649792b83c6e5c8f07b17586aeaf (diff) | |
download | otp-6c9fe3aaf3de6b400db4054bc67bf24c4e720861.tar.gz otp-6c9fe3aaf3de6b400db4054bc67bf24c4e720861.tar.bz2 otp-6c9fe3aaf3de6b400db4054bc67bf24c4e720861.zip |
Fix bug using the wrong lists search function
-rw-r--r-- | lib/common_test/src/ct_groups.erl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/common_test/src/ct_groups.erl b/lib/common_test/src/ct_groups.erl index 92640cf323..899d2bfb5a 100644 --- a/lib/common_test/src/ct_groups.erl +++ b/lib/common_test/src/ct_groups.erl @@ -325,7 +325,7 @@ modify_tc_list1(GrSpecTs, TSCs) -> true -> {[TC|TSCs1],lists:delete(TC,GrSpecTs2)}; false -> - case lists:keymember(TC, 2, GrSpecTs) of + case lists:keysearch(TC, 2, GrSpecTs) of {value,Test} -> {[Test|TSCs1], lists:keydelete(TC, 2, GrSpecTs2)}; |