aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorHenrik Nord <[email protected]>2011-09-01 14:44:19 +0200
committerHenrik Nord <[email protected]>2011-09-01 14:44:31 +0200
commitdcc4df2464c9f8005c5d242505090cc88beb2eb5 (patch)
tree5cfc18fccb08091375075865f8bb89eb029328f2
parentb347af6c37b39c04823a276d0aff6a194382ec10 (diff)
parentaf61de4fee3f5936e2ea368ded527414b69c4a78 (diff)
downloadotp-dcc4df2464c9f8005c5d242505090cc88beb2eb5.tar.gz
otp-dcc4df2464c9f8005c5d242505090cc88beb2eb5.tar.bz2
otp-dcc4df2464c9f8005c5d242505090cc88beb2eb5.zip
Merge branch 'ta/wx-obsolete-guard' into dev
* ta/wx-obsolete-guard: wx: fix obsolete guard warning (list/1) OTP-9513
-rw-r--r--lib/wx/test/wxt.erl4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/wx/test/wxt.erl b/lib/wx/test/wxt.erl
index 1f5b1cc3b1..2f52c58f26 100644
--- a/lib/wx/test/wxt.erl
+++ b/lib/wx/test/wxt.erl
@@ -72,7 +72,7 @@ resolve({Suite0, Case}) when is_atom(Suite0), is_atom(Case) ->
{Suite, Case2} ->
{Suite, Case2}
end;
-resolve(List) when list(List) ->
+resolve(List) when is_list(List) ->
[resolve(Case) || Case <- List].
alias(Suite) when is_atom(Suite) ->
@@ -104,7 +104,7 @@ read_config() ->
end.
%% Write new default config file
-write_config(Config) when list(Config) ->
+write_config(Config) when is_list(Config) ->
Fname = config_fname(),
{ok, Fd} = file:open(Fname, write),
write_list(Fd, Config),