diff options
author | Björn Gustavsson <bjorn@erlang.org> | 2010-03-10 07:32:19 +0100 |
---|---|---|
committer | Björn Gustavsson <bjorn@erlang.org> | 2010-03-11 10:26:48 +0100 |
commit | 44cc5dfcbea91ef419c55a70c67c87b3a44e7a79 (patch) | |
tree | 17d04199de37685bfc686cdf7152b93591f4e2b9 /lib/asn1/test/asn1_app_test.erl | |
parent | c5dff500f4ae51fc2182b1646538e54129e63c37 (diff) | |
download | otp-44cc5dfcbea91ef419c55a70c67c87b3a44e7a79.tar.gz otp-44cc5dfcbea91ef419c55a70c67c87b3a44e7a79.tar.bz2 otp-44cc5dfcbea91ef419c55a70c67c87b3a44e7a79.zip |
asn1 tests: Modernize guard tests
Diffstat (limited to 'lib/asn1/test/asn1_app_test.erl')
-rw-r--r-- | lib/asn1/test/asn1_app_test.erl | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lib/asn1/test/asn1_app_test.erl b/lib/asn1/test/asn1_app_test.erl index d7e4e5d52a..f0caa9e530 100644 --- a/lib/asn1/test/asn1_app_test.erl +++ b/lib/asn1/test/asn1_app_test.erl @@ -40,7 +40,7 @@ all(suite) -> app_init(suite) -> []; app_init(doc) -> []; -app_init(Config) when list(Config) -> +app_init(Config) when is_list(Config) -> case is_app(asn1) of {ok, AppFile} -> io:format("AppFile: ~n~p~n", [AppFile]), @@ -62,7 +62,7 @@ is_app(App) -> app_fin(suite) -> []; app_fin(doc) -> []; -app_fin(Config) when list(Config) -> +app_fin(Config) when is_list(Config) -> Config. @@ -72,7 +72,7 @@ fields(suite) -> []; fields(doc) -> []; -fields(Config) when list(Config) -> +fields(Config) when is_list(Config) -> AppFile = key1search(app_file, Config), Fields = [vsn, description, modules, registered, applications], case check_fields(Fields, AppFile, []) of @@ -103,7 +103,7 @@ modules(suite) -> []; modules(doc) -> []; -modules(Config) when list(Config) -> +modules(Config) when is_list(Config) -> AppFile = key1search(app_file, Config), Mods = key1search(modules, AppFile), EbinList = get_ebin_mods(asn1), @@ -174,7 +174,7 @@ exportall(suite) -> []; exportall(doc) -> []; -exportall(Config) when list(Config) -> +exportall(Config) when is_list(Config) -> AppFile = key1search(app_file, Config), Mods = key1search(modules, AppFile), check_export_all(Mods). @@ -207,7 +207,7 @@ app_depend(suite) -> []; app_depend(doc) -> []; -app_depend(Config) when list(Config) -> +app_depend(Config) when is_list(Config) -> AppFile = key1search(app_file, Config), Apps = key1search(applications, AppFile), check_apps(Apps). |