diff options
author | Björn Gustavsson <bjorn@erlang.org> | 2011-08-26 09:08:52 +0200 |
---|---|---|
committer | Björn Gustavsson <bjorn@erlang.org> | 2011-10-26 15:44:01 +0200 |
commit | b5599c98a4e38c029b1cf00f46a2323c83f59f1c (patch) | |
tree | 10c43b69a95de0af2b7712362306a335d9cebfe6 /lib/appmon | |
parent | b22894a3b82675d88b06428fe38eceeef8ca3870 (diff) | |
download | otp-b5599c98a4e38c029b1cf00f46a2323c83f59f1c.tar.gz otp-b5599c98a4e38c029b1cf00f46a2323c83f59f1c.tar.bz2 otp-b5599c98a4e38c029b1cf00f46a2323c83f59f1c.zip |
appmon: Eliminate use of deprecated regexp module
Diffstat (limited to 'lib/appmon')
-rw-r--r-- | lib/appmon/src/appmon_web.erl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/appmon/src/appmon_web.erl b/lib/appmon/src/appmon_web.erl index fb7144246c..7c0451c3c3 100644 --- a/lib/appmon/src/appmon_web.erl +++ b/lib/appmon/src/appmon_web.erl @@ -578,9 +578,9 @@ htmlify_pid([],New)-> %% the HTTP protocol %% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% urlify_pid(Pid) -> - case regexp:first_match(Pid,"[<].*[>]") of - {match,Start,Len}-> - "%3C"++string:substr(Pid,Start+1,Len-2)++"%3E"; + case re:run(Pid,"[<](.*)[>]",[{capture,all_but_first,list}]) of + {match,[PidStr]}-> + "%3C"++PidStr++"%3E"; _-> Pid end. |