my $origin = $thing->{origin};
my $chan_call = $dxchan->{call};
+ my @pc19;
+ my @pc21;
+
my $parent = Route::Node::get($origin);
unless ($parent) {
- dbg("Thingy::Rt::cf: received from $origin on $chan_call unknown") if isdbg('chanerr');
- return;
+ dbg("Thingy::Rt::cf: new (unconnected) node $origin arrived") if isdbg('chanerr');
+ $parent = Route::Node::new($origin, 0, 1);
+ push @pc19, $parent;
}
$parent->np(1);
- my @pc19;
- my @pc21;
-
# move the origin over to the user, if required
if ($thing->{user}) {
$origin = $thing->{user};
my $flag = shift;
my @out = $node->add_user($user, $flag);
- my $ur = _upd_user_rec($user, $node);
+ my $ur = _upd_user_rec($user, $node->{call});
$ur->put;
return @out;
}