#
# Bye Thingy handling
#
+# Note that this is a generator of pc21n and pc17n/pc17u
+# and a consumer of fpc21n and fpc21n
+#
# $Id$
#
# Copyright (c) 2005 Dirk Koopman G1TLH
# fix the interface routing
my $intcall = $thing->{user} || $thing->{origin};
- if ($dxchan->{call} eq $thing->{origin}) {
+ if ($dxchan->{call} eq $thing->{origin} && !$thing->{user}) {
RouteDB::delete_interface($intcall);
} else {
RouteDB::delete($intcall, $dxchan->{call});
# pc prot generation
my @pc21;
if (my $user = $thing->{user}) {
- my $parent = Route::Node->get($thing->{origin});
+ my $parent = Route::Node::get($thing->{origin});
my $uref = Route::get($user);
if ($parent && $uref) {
if ($uref->isa('Route::Node')) {
- @pc21 = $parent->del($uref);
+ @pc21 = $uref->del($parent);
} else {
$parent->del_user($uref);
- $thing->{pc17n} = $thing->{origin};
- $thing->{pc17u} = $user;
+ $thing->{pc17n} = $parent;
+ $thing->{pc17u} = [$uref];
}
}
} else {