wip

Author: dumbbell

deps/rabbitmq_peer_discovery_consul/test/system_SUITE.erl

@@ -199,10 +199,22 @@ start_consul(Config) ->
     ConsulConfDir = ?config(consul_conf_dir, Config),
     PrivDir = ?config(priv_dir, Config),
     LogFile = filename:join(PrivDir, "consul.log"),
-    Cmd = [ConsulBin, "agent", "-config-dir", ConsulConfDir, "-log-file", LogFile],
-    ConsulPid = spawn(fun() -> rabbit_ct_helpers:exec(Cmd) end),
+    Cmd = [ConsulBin, "agent",
+           "-config-dir", ConsulConfDir,
+           "-log-file", LogFile],
+    ConsulPid = spawn(fun() -> do_start_consul(Cmd) end),
     rabbit_ct_helpers:set_config(Config, {consul_pid, ConsulPid}).
 
+do_start_consul(Cmd) ->
+    case rabbit_ct_helpers:exec(Cmd) of
+        {ok, Stdout} ->
+            ct:pal("Consul daemon exited:~n~s", [Stdout]);
+        {error, Reason, Stdout} ->
+            ct:pal(
+               "Consul daemon exited with error ~0p:~n~s",
+               [Reason, Stdout])
+    end.
+
 stop_consul(Config) ->
     case rabbit_ct_helpers:get_config(Config, consul_pid) of
         ConsulPid when is_pid(ConsulPid) ->