diff options
author | Badlop <badlop@process-one.net> | 2009-12-02 23:26:28 +0000 |
---|---|---|
committer | Badlop <badlop@process-one.net> | 2009-12-02 23:26:28 +0000 |
commit | 325e67f4cb71c9a01c3386259ca861a13c911825 (patch) | |
tree | 44f58ea51c5e94634d6986b0946da4310ffad090 | |
parent | IQ sent to resource not connected, return service-unavailable instead of reci... (diff) |
Use old regexp instead re in 2.x for pre-R12B-4 compatibility.
SVN Revision: 2771
-rw-r--r-- | src/web/ejabberd_web_admin.erl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/web/ejabberd_web_admin.erl b/src/web/ejabberd_web_admin.erl index 7ef793a36..d6461b2c0 100644 --- a/src/web/ejabberd_web_admin.erl +++ b/src/web/ejabberd_web_admin.erl @@ -1947,7 +1947,7 @@ get_node(global, Node, ["db"], Query, Lang) -> end; get_node(global, Node, ["backup"], Query, Lang) -> - HomeDir = re:replace(filename:nativename(os:cmd("echo $HOME")), "\n", "", [{return, list}]), + {ok, HomeDir, _} = regexp:sub(filename:nativename(os:cmd("echo $HOME")), "\n", ""), ResS = case node_backup_parse_query(Node, Query) of nothing -> []; ok -> [?XREST("Submitted")]; |