diff options
author | John Högberg <[email protected]> | 2017-10-10 13:19:47 +0200 |
---|---|---|
committer | John Högberg <[email protected]> | 2017-11-30 15:44:35 +0100 |
commit | 1edafdf65feaab9a098e5888b95c059d28ec1a6e (patch) | |
tree | 7425a34b675f3f64aa49b66b26fdbee18998e65e | |
parent | 592305b208d92067bb6dd909f699c1b8c2e5cd22 (diff) | |
download | otp-1edafdf65feaab9a098e5888b95c059d28ec1a6e.tar.gz otp-1edafdf65feaab9a098e5888b95c059d28ec1a6e.tar.bz2 otp-1edafdf65feaab9a098e5888b95c059d28ec1a6e.zip |
Use lexemes/2 instead of the deprecated tokens/2
-rw-r--r-- | lib/kernel/test/file_SUITE.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/kernel/test/file_SUITE.erl b/lib/kernel/test/file_SUITE.erl index 767d88f113..2813028972 100644 --- a/lib/kernel/test/file_SUITE.erl +++ b/lib/kernel/test/file_SUITE.erl @@ -489,7 +489,7 @@ um_check_unicode(_Utf8Bin, {ok, _ListOrBin}, _, _UTF8_) -> um_filename(Bin, Dir, Options) when is_binary(Bin) -> um_filename(binary_to_list(Bin), Dir, Options); um_filename(Str = [_|_], Dir, Options) -> - Name = hd(string:tokens(Str, ":")), + Name = hd(string:lexemes(Str, ":")), Enc = atom_to_list(proplists:get_value(encoding, Options, latin1)), File = case lists:member(binary, Options) of true -> @@ -851,7 +851,7 @@ no_untranslatable_names() -> end. start_node(Name, Args) -> - [_,Host] = string:tokens(atom_to_list(node()), "@"), + [_,Host] = string:lexemes(atom_to_list(node()), "@"), ct:log("Trying to start ~w@~s~n", [Name,Host]), case test_server:start_node(Name, peer, [{args,Args}]) of {error,Reason} -> |