diff options
| author | Siri Hansen <[email protected]> | 2013-03-19 14:28:39 +0100 |
|---|---|---|
| committer | Siri Hansen <[email protected]> | 2013-03-19 14:31:02 +0100 |
| commit | b83c42d381b3b8aaf8f5a564b1abbeb48a17a01c (patch) | |
| tree | a0c29d68757cf51a95e6147cb236d81c918e0ccb /lib | |
| parent | 0be34905e603ca9e1acb5ea763bf25cdab8d5d7c (diff) | |
| download | otp-b83c42d381b3b8aaf8f5a564b1abbeb48a17a01c.tar.gz otp-b83c42d381b3b8aaf8f5a564b1abbeb48a17a01c.tar.bz2 otp-b83c42d381b3b8aaf8f5a564b1abbeb48a17a01c.zip | |
[os_mon] Quote path to programs run with open_port({spawn,...
This is to allow space in the path.
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/os_mon/src/nteventlog.erl | 6 | ||||
| -rw-r--r-- | lib/os_mon/src/os_sup.erl | 6 |
2 files changed, 6 insertions, 6 deletions
diff --git a/lib/os_mon/src/nteventlog.erl b/lib/os_mon/src/nteventlog.erl index d624048c29..97eaf07179 100644 --- a/lib/os_mon/src/nteventlog.erl +++ b/lib/os_mon/src/nteventlog.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 1998-2009. All Rights Reserved. +%% Copyright Ericsson AB 1998-2013. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -122,8 +122,8 @@ code_change(_OldVsn, State, _Extra) -> start_portprogram(Identifier) -> Command = - filename:join([code:priv_dir(os_mon),"bin","nteventlog.exe"]) ++ - " " ++ make_list(Identifier), + "\"" ++ filename:join([code:priv_dir(os_mon),"bin","nteventlog.exe"]) ++ + "\" " ++ make_list(Identifier), open_port({spawn,Command},[{packet,2}]). make_list(X) when is_atom(X) -> diff --git a/lib/os_mon/src/os_sup.erl b/lib/os_mon/src/os_sup.erl index f5c6c138ba..3ad8b6e990 100644 --- a/lib/os_mon/src/os_sup.erl +++ b/lib/os_mon/src/os_sup.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 1996-2009. All Rights Reserved. +%% Copyright Ericsson AB 1996-2013. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -228,8 +228,8 @@ code_change(_OldVsn, State, _Extra) -> start_portprogram() -> OwnPath = os_mon:get_env(os_sup, os_sup_own), Command = - filename:join([code:priv_dir(os_mon), "bin", "ferrule"]) ++ - " " ++ OwnPath, + "\"" ++ filename:join([code:priv_dir(os_mon), "bin", "ferrule"]) ++ + "\" " ++ OwnPath, open_port({spawn, Command}, [{packet, 2}]). %% os:cmd(cmd_str(enable)) should be done BEFORE starting os_sup |