Avoid being noisy when asked to post to node named by the empty string
This commit is contained in:
parent
5217e085ea
commit
0e8ea9b2ac
6
node.ml
6
node.ml
|
@ -72,11 +72,9 @@ let bind_ignore (filter, node) =
|
||||||
else Log.warn "Duplicate binding" [Sexp.Str filter]
|
else Log.warn "Duplicate binding" [Sexp.Str filter]
|
||||||
|
|
||||||
let send_ignore name body =
|
let send_ignore name body =
|
||||||
if send name body
|
if send name body || name = ""
|
||||||
then ()
|
then ()
|
||||||
else (Log.warn "send to missing node" [Sexp.Str name];
|
else Log.warn "send to missing node" [Sexp.Str name; body]
|
||||||
Sexp.output_sexp Pervasives.stdout body;
|
|
||||||
print_newline ())
|
|
||||||
|
|
||||||
let post_ignore name label body token =
|
let post_ignore name label body token =
|
||||||
send_ignore name (Message.post (label, body, token))
|
send_ignore name (Message.post (label, body, token))
|
||||||
|
|
Loading…
Reference in New Issue