ssh: replace ?config in tests

OTP-13565

1 files changed, 11 insertions, 12 deletions

diff --git a/lib/ssh/test/ssh_algorithms_SUITE.erl b/lib/ssh/test/ssh_algorithms_SUITE.erl
index 6894f83547..ed9e7aacaa 100644
--- a/lib/ssh/test/ssh_algorithms_SUITE.erl
+++ b/lib/ssh/test/ssh_algorithms_SUITE.erl
@@ -111,7 +111,7 @@ init_per_group(Group, Config) ->
 	false ->
 	    %% An algorithm group
 	    Tag = proplists:get_value(name,
-				      hd(?config(tc_group_path, Config))),
+				      hd(proplists:get_value(tc_group_path, Config))),
 	    Alg = Group,
 	    PA =
 		case split(Alg) of
@@ -128,10 +128,10 @@ init_per_group(Group, Config) ->
     end.
 
 end_per_group(_Alg, Config) ->
-    case ?config(srvr_pid,Config) of
+    case proplists:get_value(srvr_pid,Config) of
 	Pid when is_pid(Pid) ->
 	    ssh:stop_daemon(Pid),
-	    ct:log("stopped ~p",[?config(srvr_addr,Config)]);
+	    ct:log("stopped ~p",[proplists:get_value(srvr_addr,Config)]);
 	_ ->
 	    ok
     end.
@@ -139,17 +139,16 @@ end_per_group(_Alg, Config) ->
 
 
 init_per_testcase(sshc_simple_exec_os_cmd, Config) ->
-    start_pubkey_daemon([?config(pref_algs,Config)], Config);
-    
+    start_pubkey_daemon([proplists:get_value(pref_algs,Config)], Config);
 init_per_testcase(_TC, Config) ->
     Config.
 
 
 end_per_testcase(sshc_simple_exec_os_cmd, Config) ->
-    case ?config(srvr_pid,Config) of
+    case proplists:get_value(srvr_pid,Config) of
 	Pid when is_pid(Pid) ->
 	    ssh:stop_daemon(Pid),
-	    ct:log("stopped ~p",[?config(srvr_addr,Config)]);
+	    ct:log("stopped ~p",[proplists:get_value(srvr_addr,Config)]);
 	_ ->
 	    ok
     end;
@@ -161,13 +160,13 @@ end_per_testcase(_TC, Config) ->
 %%--------------------------------------------------------------------
 %% A simple sftp transfer
 simple_sftp(Config) ->
-    {Host,Port} = ?config(srvr_addr, Config),
+    {Host,Port} = proplists:get_value(srvr_addr, Config),
     ssh_test_lib:std_simple_sftp(Host, Port, Config).
 
 %%--------------------------------------------------------------------
 %% A simple exec call
 simple_exec(Config) ->
-    {Host,Port} = ?config(srvr_addr, Config),
+    {Host,Port} = proplists:get_value(srvr_addr, Config),
     ssh_test_lib:std_simple_exec(Host, Port, Config).
 
 %%--------------------------------------------------------------------
@@ -378,8 +377,8 @@ start_pubkey_daemon(Opts0, Config) ->
 
 
 setup_pubkey(Config) ->
-    DataDir = ?config(data_dir, Config),
-    UserDir = ?config(priv_dir, Config),
+    DataDir = proplists:get_value(data_dir, Config),
+    UserDir = proplists:get_value(priv_dir, Config),
     ssh_test_lib:setup_dsa(DataDir, UserDir),
     ssh_test_lib:setup_rsa(DataDir, UserDir),
     ssh_test_lib:setup_ecdsa("256", DataDir, UserDir),
@@ -389,7 +388,7 @@ setup_pubkey(Config) ->
 simple_exec_group(I, Config) when is_integer(I) ->
     simple_exec_group({I,I,I}, Config);
 simple_exec_group({Min,I,Max}, Config) ->
-    {Host,Port} = ?config(srvr_addr, Config),
+    {Host,Port} = proplists:get_value(srvr_addr, Config),
     ssh_test_lib:std_simple_exec(Host, Port, Config,
 				 [{dh_gex_limits,{Min,I,Max}}]).