diff options
| author | Darkelarious <darkelarious@333networks.com> | 2017-03-05 22:19:52 +0100 |
|---|---|---|
| committer | Darkelarious <darkelarious@333networks.com> | 2017-03-05 22:19:52 +0100 |
| commit | 84af66aba26d2088d5d95c240d176f3edaf17b58 (patch) | |
| tree | fe427eab0ed27238e725fa045ce4420e37063d7c /lib/MasterServer/TCP/UCCAppletQuery.pm | |
| parent | 1bdd05e9167879eb218f61af8cad6e31d399674c (diff) | |
| download | MasterServer-Perl-84af66aba26d2088d5d95c240d176f3edaf17b58.tar.gz MasterServer-Perl-84af66aba26d2088d5d95c240d176f3edaf17b58.zip | |
Split error logging over multiple error types
Diffstat (limited to 'lib/MasterServer/TCP/UCCAppletQuery.pm')
| -rwxr-xr-x | lib/MasterServer/TCP/UCCAppletQuery.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/MasterServer/TCP/UCCAppletQuery.pm b/lib/MasterServer/TCP/UCCAppletQuery.pm index e3eb587..7637e9f 100755 --- a/lib/MasterServer/TCP/UCCAppletQuery.pm +++ b/lib/MasterServer/TCP/UCCAppletQuery.pm @@ -29,7 +29,7 @@ sub query_applet { connect => [$ms->{ip} => $ms->{port}], timeout => 5, poll => 'r', - on_error => sub {$self->log("error", "$! on $ms->{ip}:$ms->{port}."); $handle->destroy;}, + on_error => sub {$self->error($!, "$ms->{ip}:$ms->{port}"); $handle->destroy;}, on_eof => sub {$self->process_ucc_applet_query($master_list, $ms); $handle->destroy;}, on_read => sub { |