aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDaniel Pettersson <[email protected]>2017-07-05 23:35:58 +0200
committerDaniel Pettersson <[email protected]>2017-07-05 23:35:58 +0200
commit6be0ed124af615a3ea17d4f913649b50aef68821 (patch)
tree4bac467b45eb034dffeafccf92e9e1dac02807cf
parent3da6adc679825d17ce65e7363af6554e5ee1661a (diff)
downloadotp-6be0ed124af615a3ea17d4f913649b50aef68821.tar.gz
otp-6be0ed124af615a3ea17d4f913649b50aef68821.tar.bz2
otp-6be0ed124af615a3ea17d4f913649b50aef68821.zip
Add support for binary input in ssh_io
-rw-r--r--lib/ssh/src/ssh_io.erl8
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/ssh/src/ssh_io.erl b/lib/ssh/src/ssh_io.erl
index 8ba759ad60..a7cd1daeec 100644
--- a/lib/ssh/src/ssh_io.erl
+++ b/lib/ssh/src/ssh_io.erl
@@ -31,8 +31,8 @@ read_line(Prompt, Opts) ->
format("~s", [listify(Prompt)]),
?GET_INTERNAL_OPT(user_pid, Opts) ! {self(), question},
receive
- Answer when is_list(Answer) ->
- Answer
+ Answer when is_list(Answer) or is_binary(Answer) ->
+ unicode:characters_to_list(Answer)
end.
yes_no(Prompt, Opts) ->
@@ -44,7 +44,7 @@ yes_no(Prompt, Opts) ->
y -> yes;
n -> no;
- Answer when is_list(Answer) ->
+ Answer when is_list(Answer) or is_binary(Answer) ->
case trim(Answer) of
"y" -> yes;
"n" -> no;
@@ -60,7 +60,7 @@ read_password(Prompt, Opts) ->
format("~s", [listify(Prompt)]),
?GET_INTERNAL_OPT(user_pid, Opts) ! {self(), user_password},
receive
- Answer when is_list(Answer) ->
+ Answer when is_list(Answer) or is_binary(Answer) ->
case trim(Answer) of
"" ->
read_password(Prompt, Opts);