aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorHans Nilsson <[email protected]>2015-10-30 11:33:40 +0100
committerHans Nilsson <[email protected]>2015-11-04 12:09:56 +0100
commit193ccf4009eb346ca5dd43679b219e395016b03d (patch)
treed192e07e696aaf1e74c5a95462068205eb9000ec
parentc505918a86fb9ac8c19e47cd751a9db4e2d9efb2 (diff)
downloadotp-193ccf4009eb346ca5dd43679b219e395016b03d.tar.gz
otp-193ccf4009eb346ca5dd43679b219e395016b03d.tar.bz2
otp-193ccf4009eb346ca5dd43679b219e395016b03d.zip
ssh: enable users to give option keyboard_interact_fun
It is on purpose not documented. It needs more thinking before being finalized.
-rw-r--r--lib/ssh/src/ssh.erl4
1 files changed, 4 insertions, 0 deletions
diff --git a/lib/ssh/src/ssh.erl b/lib/ssh/src/ssh.erl
index 6f79b48091..693b55a09e 100644
--- a/lib/ssh/src/ssh.erl
+++ b/lib/ssh/src/ssh.erl
@@ -337,6 +337,8 @@ handle_option([{pwdfun, _} = Opt | Rest], SocketOptions, SshOptions) ->
handle_option(Rest, SocketOptions, [handle_ssh_option(Opt) | SshOptions]);
handle_option([{key_cb, _} = Opt | Rest], SocketOptions, SshOptions) ->
handle_option(Rest, SocketOptions, [handle_ssh_option(Opt) | SshOptions]);
+handle_option([{keyboard_interact_fun, _} = Opt | Rest], SocketOptions, SshOptions) ->
+ handle_option(Rest, SocketOptions, [handle_ssh_option(Opt) | SshOptions]);
%%Backwards compatibility
handle_option([{allow_user_interaction, Value} | Rest], SocketOptions, SshOptions) ->
handle_option(Rest, SocketOptions, [handle_ssh_option({user_interaction, Value}) | SshOptions]);
@@ -468,6 +470,8 @@ handle_ssh_option({pwdfun, Value} = Opt) when is_function(Value,4) ->
Opt;
handle_ssh_option({key_cb, Value} = Opt) when is_atom(Value) ->
Opt;
+handle_ssh_option({keyboard_interact_fun, Value} = Opt) when is_function(Value,3) ->
+ Opt;
handle_ssh_option({compression, Value} = Opt) when is_atom(Value) ->
Opt;
handle_ssh_option({exec, {Module, Function, _}} = Opt) when is_atom(Module),