diff options
author | Hans Bolinder <[email protected]> | 2019-08-21 09:40:13 +0200 |
---|---|---|
committer | Hans Bolinder <[email protected]> | 2019-08-21 09:40:13 +0200 |
commit | 504d151a57bc93acb3fb7597214a8e62be9c1cfd (patch) | |
tree | f00c1e3bd932dd07dcb7142be1c749e1bb221420 /lib/kernel/src/file.erl | |
parent | fc9b69dac7497a250658680eb9e44e6ccf79d0bc (diff) | |
parent | b9aef66da02a8e27b021ad3be2101b221c760a1f (diff) | |
download | otp-504d151a57bc93acb3fb7597214a8e62be9c1cfd.tar.gz otp-504d151a57bc93acb3fb7597214a8e62be9c1cfd.tar.bz2 otp-504d151a57bc93acb3fb7597214a8e62be9c1cfd.zip |
Merge branch 'hasse/remove_old_IO_requests/OTP-15695'
* hasse/remove_old_IO_requests/OTP-15695:
stdlib: Remove old I/O-requests from test suites
stdlib (doc): Do not mention old requests
snmp: Update old format I/O-request
sasl: Use encoding when reading terms
parsetools (doc): Update old format I/O-requests
mnesia: Update old format I/O-request
kernel: Update old format I/O-requests
stdlib: Remove no longer used function
kernel: Remove commented out code
stdlib: Remove commented out code
Diffstat (limited to 'lib/kernel/src/file.erl')
-rw-r--r-- | lib/kernel/src/file.erl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/kernel/src/file.erl b/lib/kernel/src/file.erl index 2ad2df97a8..cde03ce1c4 100644 --- a/lib/kernel/src/file.erl +++ b/lib/kernel/src/file.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 1996-2018. All Rights Reserved. +%% Copyright Ericsson AB 1996-2019. All Rights Reserved. %% %% Licensed under the Apache License, Version 2.0 (the "License"); %% you may not use this file except in compliance with the License. @@ -555,7 +555,7 @@ allocate(#file_descriptor{module = Module} = Handle, Offset, Length) -> | {no_translation, unicode, latin1}. read(File, Sz) when (is_pid(File) orelse is_atom(File)), is_integer(Sz), Sz >= 0 -> - case io:request(File, {get_chars, '', Sz}) of + case io:request(File, {get_chars, latin1, '', Sz}) of Data when is_list(Data); is_binary(Data) -> {ok, Data}; Other -> @@ -576,7 +576,7 @@ read(_, _) -> | {no_translation, unicode, latin1}. read_line(File) when (is_pid(File) orelse is_atom(File)) -> - case io:request(File, {get_line, ''}) of + case io:request(File, {get_line, latin1, ''}) of Data when is_list(Data); is_binary(Data) -> {ok, Data}; Other -> |