diff options
author | Björn-Egil Dahlberg <[email protected]> | 2012-01-04 14:44:14 +0100 |
---|---|---|
committer | Björn-Egil Dahlberg <[email protected]> | 2012-01-04 14:44:14 +0100 |
commit | d79b413adcf4c084df30f831486ba1f1ac504c5c (patch) | |
tree | 02e8287ab9e154dde91c54dd80621712d83959d6 /erts/test/z_SUITE.erl | |
parent | 0d4600294cecec20daef0d055cb7e8e95ce6667e (diff) | |
download | otp-d79b413adcf4c084df30f831486ba1f1ac504c5c.tar.gz otp-d79b413adcf4c084df30f831486ba1f1ac504c5c.tar.bz2 otp-d79b413adcf4c084df30f831486ba1f1ac504c5c.zip |
erts: Use re instead of regexp in testsuite
Diffstat (limited to 'erts/test/z_SUITE.erl')
-rw-r--r-- | erts/test/z_SUITE.erl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/erts/test/z_SUITE.erl b/erts/test/z_SUITE.erl index 482ecb8fba..28da923497 100644 --- a/erts/test/z_SUITE.erl +++ b/erts/test/z_SUITE.erl @@ -236,8 +236,8 @@ format_core(#core_search_conf{file = false}, Core, Ignore) -> [Ignore, Core] ++ mod_time_list(Core)); format_core(#core_search_conf{file = File}, Core, Ignore) -> FRes = str_strip(os:cmd(File ++ " " ++ Core)), - case catch regexp:match(FRes, Core) of - {match, _, _} -> + case catch re:run(FRes, Core, [caseless,{capture,none}]) of + match -> io:format(" ~s~s " ++ time_fstr() ++ "~n", [Ignore, FRes] ++ mod_time_list(Core)); _ -> |