aboutsummaryrefslogtreecommitdiffstats
path: root/lib/sasl/src/erlsrv.erl
diff options
context:
space:
mode:
authorSiri Hansen <[email protected]>2013-06-05 14:52:22 +0200
committerSiri Hansen <[email protected]>2013-06-05 14:52:22 +0200
commit23623a4837f3971623549c73257474d828fe25f2 (patch)
tree40ddd5b6c10184db79a2010ae9a4fd5b68eda32f /lib/sasl/src/erlsrv.erl
parentaf03cbc7b14fc504e181332d6902de109049725f (diff)
parentdd850c00803939e44d7f2ea6659825d0ab861b9d (diff)
downloadotp-23623a4837f3971623549c73257474d828fe25f2.tar.gz
otp-23623a4837f3971623549c73257474d828fe25f2.tar.bz2
otp-23623a4837f3971623549c73257474d828fe25f2.zip
Merge branch 'siri/spawn-and-space'
* siri/spawn-and-space: [sasl] In test, quote erlsrv executable in call to open_port/2 [test_server] Quote path to erl executable when starting slave nodes Quote path to erl executable in slave to allow space in path [sasl] Quote path to program run with open_port({spawn,... [os_mon] Quote path to programs run with open_port({spawn,... Conflicts: lib/os_mon/src/nteventlog.erl
Diffstat (limited to 'lib/sasl/src/erlsrv.erl')
-rw-r--r--lib/sasl/src/erlsrv.erl6
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/sasl/src/erlsrv.erl b/lib/sasl/src/erlsrv.erl
index 711c1c6f1c..0d931f1779 100644
--- a/lib/sasl/src/erlsrv.erl
+++ b/lib/sasl/src/erlsrv.erl
@@ -1,7 +1,7 @@
%%
%% %CopyrightBegin%
%%
-%% Copyright Ericsson AB 1998-2011. 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
@@ -39,7 +39,7 @@ current_version() ->
run_erlsrv(Command) ->
run_erlsrv(current_version(),Command).
run_erlsrv(EVer, Command) ->
- case catch(open_port({spawn, erlsrv(EVer) ++ " " ++ Command},
+ case catch(open_port({spawn, "\"" ++ erlsrv(EVer) ++ "\" " ++ Command},
[{line,1000}, in, eof])) of
{'EXIT',{Reason,_}} ->
{port_error, Reason};
@@ -53,7 +53,7 @@ run_erlsrv(EVer, Command) ->
end.
run_erlsrv_interactive(EVer, Commands) ->
- case catch(open_port({spawn, erlsrv(EVer) ++ " readargs"},
+ case catch(open_port({spawn, "\""++ erlsrv(EVer) ++ "\" readargs"},
[{line,1000}, eof])) of
{'EXIT',{Reason,_}} ->
{port_error, Reason};