X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FThingy%2FRt.pm;h=bb81b1b35301df7ba40dbe478d1ee4f0259885d4;hb=14cb55073f64836f3f2a1aaf3a86207dec4fa103;hp=29ec2cfdbb72758048b3bec145a40c07d51fa12d;hpb=53a46e27296f76f27cd5c8db6f9853b26515f1f1;p=spider.git diff --git a/perl/Thingy/Rt.pm b/perl/Thingy/Rt.pm index 29ec2cfd..bb81b1b3 100644 --- a/perl/Thingy/Rt.pm +++ b/perl/Thingy/Rt.pm @@ -128,9 +128,14 @@ sub handle_edu my ($type, $here, $call) = unpack "A1 A1 A*", $_; if ($type eq 'U') { unless ($nref) { - dbg("Thingy::Rt::ed need a node before $call"); + dbg("Thingy::Rt::edu need a node before $call"); return; } + my $uref = Route::User::get($call); + unless ($uref) { + dbg("Thingy::Rt::edu $call not a user") if isdbg('chanerr'); + next; + } $nref->del_user($call); RouteDB::delete($call, $dxchan->{call}); } elsif ($type eq 'N') {