+ my ($call, $is_node, $is_extnode, $here, $version, $build) = _decode_pc92_call($_[$i]);
+ if ($call) {
+ if ($is_node) {
+ push @nodes, $call;
+ } else {
+ push @users, $call;
+ }
+ } else {
+ dbg("DXPROT: pc92 call entry '$_[$i]' not decoded, ignored") if isdbg('chanerr');
+ }
+ }
+
+ my ($dnodes, $dusers, $nnodes, $nusers) = $parent->calc_config_changes(\@nodes, \@users);
+
+ for ($i = 4; $_[$i]; $i++) {
+ my ($call, $is_node, $is_extnode, $here, $version, $build) = _decode_pc92_call($_[$i]);
+ if ($call) {
+ push @radd,_add_thingy($parent, $_[$i]) if grep $call eq $_, (@$nnodes, @$nusers);
+ push @rdel,_del_thingy($parent, $_[$i]) if grep $call eq $_, (@$dnodes, @$dusers);
+ }