- my @rout = grep {$_ != $node } $main::routeroot->remove_route($node, $self) if $node;
- my @rusers;
- push @rusers, $_->unlink_all_users for @rout;
+ my @rout;
+ foreach my $n ($node->nodes) {
+ next if $n eq $main::mycall;
+ next if $n eq $self->{call};
+ my $nref = Route::Node::get($n);
+ push @rout, $node->remove_route($nref, $self) if $nref;
+ }