[ct] Print unicode atoms and strings correctly in common_test logs

And use correct encoding when printing to files.

1 files changed, 5 insertions, 5 deletions

diff --git a/lib/common_test/src/ct_master_logs.erl b/lib/common_test/src/ct_master_logs.erl
index 52003f752d..985eb9063d 100644
--- a/lib/common_test/src/ct_master_logs.erl
+++ b/lib/common_test/src/ct_master_logs.erl
@@ -110,16 +110,16 @@ init(Parent,LogDir,Nodes) ->
 	    case copy_priv_files(PrivFilesSrc, PrivFilesDestTop) of
 		{error,Src1,Dest1,Reason1} ->
 		    io:format(user, "ERROR! "++
-			      "Priv file ~p could not be copied to ~p. "++
-			      "Reason: ~p~n",
+			      "Priv file ~tp could not be copied to ~tp. "++
+			      "Reason: ~tp~n",
 			      [Src1,Dest1,Reason1]),
 		    exit({priv_file_error,Dest1});
 		ok ->
 		    case copy_priv_files(PrivFilesSrc, PrivFilesDestRun) of
 			{error,Src2,Dest2,Reason2} ->
 			    io:format(user, "ERROR! "++
-				      "Priv file ~p could not be copied to ~p. "++
-				      "Reason: ~p~n",
+				      "Priv file ~tp could not be copied to ~tp. "++
+				      "Reason: ~tp~n",
 				      [Src2,Dest2,Reason2]),
 			    exit({priv_file_error,Dest2});
 			ok ->
@@ -170,7 +170,7 @@ loop(State) ->
 			case catch io:format(Fd,Str++"\n",Args) of
 			    {'EXIT',Reason} ->
 				io:format(Fd, 
-					  "Logging fails! Str: ~p, Args: ~p~n",
+					  "Logging fails! Str: ~tp, Args: ~tp~n",
 					  [Str,Args]),
 				exit({logging_failed,Reason}),
 				ok;