don't crash when Node:status/1 is called prior to any gen_server init…

…ialising
nebularis · May 31, 2012 · f7b0262 · f7b0262
1 parent a2d513b
commit f7b0262
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/src/systest_cli.erl b/src/systest_cli.erl
@@ -71,9 +71,9 @@ kill(#'systest.node_info'{owner=Server}) ->
 
 -spec status(systest_node:node_info()) -> 'nodeup' | {'nodedown', term()}.
 status(#'systest.node_info'{owner=Server}) ->
-    case is_process_alive(Server) of
-        false -> ct:pal("Server process down!~n"), {'nodedown', unknown};
-        true  -> gen_server:call(Server, ping)
+    case catch(is_process_alive(Server)) of
+        true  -> gen_server:call(Server, ping);
+        _     -> {'nodedown', no_server}
     end.
 
 -spec interact(systest_node:node_info(),