aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorBjörn Gustavsson <[email protected]>2011-08-26 09:08:52 +0200
committerBjörn Gustavsson <[email protected]>2011-10-26 15:44:01 +0200
commitb5599c98a4e38c029b1cf00f46a2323c83f59f1c (patch)
tree10c43b69a95de0af2b7712362306a335d9cebfe6
parentb22894a3b82675d88b06428fe38eceeef8ca3870 (diff)
downloadotp-b5599c98a4e38c029b1cf00f46a2323c83f59f1c.tar.gz
otp-b5599c98a4e38c029b1cf00f46a2323c83f59f1c.tar.bz2
otp-b5599c98a4e38c029b1cf00f46a2323c83f59f1c.zip
appmon: Eliminate use of deprecated regexp module
-rw-r--r--lib/appmon/src/appmon_web.erl6
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.