From a8af32c54ba35dde5edd11c5be720c1883f54335 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Lo=C3=AFc=20Hoguin?= Date: Sun, 3 Apr 2011 15:21:29 +0200 Subject: Don't ignore the return values in cowboy:stop_listener/1. --- src/cowboy.erl | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) (limited to 'src/cowboy.erl') diff --git a/src/cowboy.erl b/src/cowboy.erl index 6931114..6aa5786 100644 --- a/src/cowboy.erl +++ b/src/cowboy.erl @@ -27,7 +27,11 @@ start_listener(Ref, NbAcceptors, Transport, TransOpts, Protocol, ProtoOpts) -> ]}, permanent, 5000, supervisor, [cowboy_listener_sup]}). --spec stop_listener(Ref::term()) -> ok. +-spec stop_listener(Ref::term()) -> ok | {error, not_found}. stop_listener(Ref) -> - supervisor:terminate_child(cowboy_sup, {cowboy_listener_sup, Ref}), - supervisor:delete_child(cowboy_sup, {cowboy_listener_sup, Ref}). + case supervisor:terminate_child(cowboy_sup, {cowboy_listener_sup, Ref}) of + ok -> + supervisor:delete_child(cowboy_sup, {cowboy_listener_sup, Ref}); + {error, Reason} -> + {error, Reason} + end. -- cgit v1.2.3