diff options
author | Dan Gudmundsson <[email protected]> | 2013-05-23 12:08:46 +0200 |
---|---|---|
committer | Dan Gudmundsson <[email protected]> | 2014-01-21 10:56:50 +0100 |
commit | 248e2eb0462e5d180b2c35a726aba734ce2c2182 (patch) | |
tree | 531f93770950553ff9519ef0b2cb497279d5d285 /lib/test_server/src/ts_lib.erl | |
parent | a9468296fce5c2f26b448175ec77660ddbad2c76 (diff) | |
download | otp-248e2eb0462e5d180b2c35a726aba734ce2c2182.tar.gz otp-248e2eb0462e5d180b2c35a726aba734ce2c2182.tar.bz2 otp-248e2eb0462e5d180b2c35a726aba734ce2c2182.zip |
test_server: Fix ts write unicode in config files
Diffstat (limited to 'lib/test_server/src/ts_lib.erl')
-rw-r--r-- | lib/test_server/src/ts_lib.erl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/test_server/src/ts_lib.erl b/lib/test_server/src/ts_lib.erl index 9f56f59fed..5368960446 100644 --- a/lib/test_server/src/ts_lib.erl +++ b/lib/test_server/src/ts_lib.erl @@ -164,7 +164,7 @@ subst_file(In, Out, Vars) -> case file:read_file(In) of {ok, Bin} -> Subst = subst(b2s(Bin), Vars, []), - case file:write_file(Out, Subst) of + case file:write_file(Out, unicode:characters_to_binary(Subst)) of ok -> ok; {error, Reason} -> |