diff options
author | Björn Gustavsson <[email protected]> | 2016-02-25 15:51:39 +0100 |
---|---|---|
committer | Björn Gustavsson <[email protected]> | 2016-03-10 14:31:23 +0100 |
commit | 59438cf3176f6c2d835f5aba29179f6e7ff1b0da (patch) | |
tree | 07495d99fbeed7a9466b9549634a70b35ad34f31 /lib/kernel/test/file_name_SUITE.erl | |
parent | b9c24a79d838579c11f8b32b4ef34261ef29168b (diff) | |
download | otp-59438cf3176f6c2d835f5aba29179f6e7ff1b0da.tar.gz otp-59438cf3176f6c2d835f5aba29179f6e7ff1b0da.tar.bz2 otp-59438cf3176f6c2d835f5aba29179f6e7ff1b0da.zip |
Eliminate use of doc and suite clauses
Those clause are obsolete and never used by common_test.
Diffstat (limited to 'lib/kernel/test/file_name_SUITE.erl')
-rw-r--r-- | lib/kernel/test/file_name_SUITE.erl | 25 |
1 files changed, 5 insertions, 20 deletions
diff --git a/lib/kernel/test/file_name_SUITE.erl b/lib/kernel/test/file_name_SUITE.erl index ccdc1116e0..b3ebc48856 100644 --- a/lib/kernel/test/file_name_SUITE.erl +++ b/lib/kernel/test/file_name_SUITE.erl @@ -106,10 +106,7 @@ init_per_group(_GroupName, Config) -> end_per_group(_GroupName, Config) -> Config. -home_dir(suite) -> - []; -home_dir(doc) -> - ["Check that Erlang can be started with unicode named home directory"]; +%% Check that Erlang can be started with unicode named home directory. home_dir(Config) when is_list(Config) -> try Name=[960,945,964,961,953,954], @@ -154,10 +151,7 @@ home_dir(Config) when is_list(Config) -> {skipped,"Runs only on Unix/Windows"} end. -normalize(suite) -> - []; -normalize(doc) -> - ["Check that filename normalization works"]; +%% Check that filename normalization works. normalize(Config) when is_list(Config) -> rand:seed(exsplus, {1290,431421,830412}), try @@ -185,10 +179,7 @@ normalize(Config) when is_list(Config) -> {skipped,"VM needs to be started in Unicode filename mode"} end. -normal(suite) -> - []; -normal(doc) -> - "Check file operations on normal file names regardless of unicode mode"; +%% Check file operations on normal file names regardless of unicode mode. normal(Config) when is_list(Config) -> {ok,Dir} = file:get_cwd(), try @@ -206,10 +197,7 @@ normal(Config) when is_list(Config) -> end. -icky(suite) -> - []; -icky(doc) -> - "Check file operations on normal file names regardless of unicode mode"; +%% Check file operations on normal file names regardless of unicode mode. icky(Config) when is_list(Config) -> case hopeless_darwin() of true -> @@ -230,10 +218,7 @@ icky(Config) when is_list(Config) -> file:set_cwd(Dir) end end. -very_icky(suite) -> - []; -very_icky(doc) -> - "Check file operations on normal file names regardless of unicode mode"; +%% Check file operations on normal file names regardless of unicode mode. very_icky(Config) when is_list(Config) -> case hopeless_darwin() of true -> |