diff options
author | Peter Andersson <[email protected]> | 2012-11-23 15:25:24 +0100 |
---|---|---|
committer | Peter Andersson <[email protected]> | 2012-11-23 15:25:24 +0100 |
commit | 0dc1b3b039628cb154fa04dd06b0a138f95b6e7e (patch) | |
tree | 7e1cb0f27df77043ba26c130ae9cdba94fa56dbe /lib/common_test/src | |
parent | 19bc00736ee2621f4016d53d3270334dd998cb34 (diff) | |
parent | 561d818c5b63198565a66644272d6037e6d938bc (diff) | |
download | otp-0dc1b3b039628cb154fa04dd06b0a138f95b6e7e.tar.gz otp-0dc1b3b039628cb154fa04dd06b0a138f95b6e7e.tar.bz2 otp-0dc1b3b039628cb154fa04dd06b0a138f95b6e7e.zip |
Merge branch 'peppe/common_test/group_search_r15b03.fix'
Diffstat (limited to 'lib/common_test/src')
-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 24ca3826a8..74ab5e5439 100644 --- a/lib/common_test/src/ct_groups.erl +++ b/lib/common_test/src/ct_groups.erl @@ -176,7 +176,7 @@ find(Mod, GrNames, all, [{M,TC} | Gs], Known, %% Check if test case should be saved find(Mod, GrNames, TCs, [TC | Gs], Known, Defs, FindAll) when is_atom(TC) orelse - ((size(TC) == 2) and (hd(TC) /= group)) -> + ((size(TC) == 2) and (element(1,TC) /= group)) -> Case = if is_atom(TC) -> Tuple = {Mod,TC}, |