diff options
| author | Siri Hansen <[email protected]> | 2017-08-25 16:50:07 +0200 |
|---|---|---|
| committer | Siri Hansen <[email protected]> | 2017-09-05 11:32:03 +0200 |
| commit | 46e5b36b2a2fd70fef26ee0ad7e08a3c7c2fd7fd (patch) | |
| tree | 87560a93e1f2d6539b7be7064de7d2ba557cc777 /lib/common_test/src/ct_testspec.erl | |
| parent | 4bf9c5a5cc52a0ce76fbec638deff0ff88a5dfd8 (diff) | |
| download | otp-46e5b36b2a2fd70fef26ee0ad7e08a3c7c2fd7fd.tar.gz otp-46e5b36b2a2fd70fef26ee0ad7e08a3c7c2fd7fd.tar.bz2 otp-46e5b36b2a2fd70fef26ee0ad7e08a3c7c2fd7fd.zip | |
ct: use 'unicode' option for regexps
Diffstat (limited to 'lib/common_test/src/ct_testspec.erl')
| -rw-r--r-- | lib/common_test/src/ct_testspec.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/common_test/src/ct_testspec.erl b/lib/common_test/src/ct_testspec.erl index 09839bd35d..bb445bb0d2 100644 --- a/lib/common_test/src/ct_testspec.erl +++ b/lib/common_test/src/ct_testspec.erl @@ -537,7 +537,7 @@ replace_names_in_elems([],Modified,_Defs) -> replace_names_in_string(Term,Defs=[{Name,Replacement=[Ch|_]}|Ds]) when is_integer(Ch) -> try re:replace(Term,[$'|atom_to_list(Name)]++"'", - Replacement,[{return,list}]) of + Replacement,[{return,list},unicode]) of Term -> % no match, proceed replace_names_in_string(Term,Ds); Term1 -> @@ -569,7 +569,7 @@ replace_names_in_node1(NodeStr,Defs=[{Name,Replacement}|Ds]) -> replace_names_in_node1(NodeStr,Ds); true -> case re:replace(NodeStr,atom_to_list(Name), - ReplStr,[{return,list}]) of + ReplStr,[{return,list},unicode]) of NodeStr -> % no match, proceed replace_names_in_node1(NodeStr,Ds); NodeStr1 -> |