aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPeter Andersson <[email protected]>2012-11-23 15:11:20 +0100
committerPeter Andersson <[email protected]>2012-11-23 15:11:20 +0100
commit561d818c5b63198565a66644272d6037e6d938bc (patch)
treeb878a0b24901efeb7b66a6d7972570e27e30cbaf
parent4c4c78734e5376264e6fca95318ae0e45ce34b37 (diff)
downloadotp-561d818c5b63198565a66644272d6037e6d938bc.tar.gz
otp-561d818c5b63198565a66644272d6037e6d938bc.tar.bz2
otp-561d818c5b63198565a66644272d6037e6d938bc.zip
Fix silly bug
-rw-r--r--lib/common_test/src/ct_groups.erl2
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},