aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorFredrik Gustafsson <[email protected]>2013-03-27 17:21:27 +0100
committerFredrik Gustafsson <[email protected]>2013-04-05 12:29:19 +0200
commit6dd7f8b06500110b4aeed660c674af6738ef709d (patch)
tree2aee5c51e617fdaea52e835a92fa47d781c30003
parentb269e15eea9232205a371d6b10c50628d836b661 (diff)
downloadotp-6dd7f8b06500110b4aeed660c674af6738ef709d.tar.gz
otp-6dd7f8b06500110b4aeed660c674af6738ef709d.tar.bz2
otp-6dd7f8b06500110b4aeed660c674af6738ef709d.zip
ssh: If not valid expression, rather than generate a error, try to use the cmd.
-rw-r--r--lib/ssh/src/ssh_cli.erl7
1 files changed, 6 insertions, 1 deletions
diff --git a/lib/ssh/src/ssh_cli.erl b/lib/ssh/src/ssh_cli.erl
index 7232cc482c..0531ad7830 100644
--- a/lib/ssh/src/ssh_cli.erl
+++ b/lib/ssh/src/ssh_cli.erl
@@ -189,7 +189,12 @@ terminate(_Reason, _State) ->
%%--------------------------------------------------------------------
exec(Cmd) ->
- eval(parse(scan(Cmd))).
+ case eval(parse(scan(Cmd))) of
+ {error, _} ->
+ {Cmd, 0}; %% This should be an external call
+ Term ->
+ Term
+ end.
scan(Cmd) ->
erl_scan:string(Cmd).