$self->send_rcmd_reply($main::mycall, $fromnode, $user, "sorry...!");
return;
}
- Log('rcmd', 'in', ($ref->{priv}||0), $fromnode, $cmd);
+ Log('rcmd', 'in', ($ref->{priv}||0), $fromnode, $cmd, $user);
my $cref = Route::Node::get($fromnode);
unless ($cref && UNIVERSAL::isa($cref, 'Route')) {
dbg("DXProt process_rcmd: Route $fromnode isn't a reference (tell G1TLH)");
while (@_) {
my $line = shift;
$line =~ s/\s*$//;
- Log('rcmd', 'out', $fromnode, $line);
+ Log('rcmd', 'out', $fromnode, $line, $user);
if ($self->is_clx) {
$self->send(pc85($main::mycall, $fromnode, $user, "$main::mycall:$line"));
} else {
}
my @res = $cmdref->(@$args);
+# diffms("by $call 1", $line, $t0, scalar @res) if isdbg('chan');
return @res;
},
# $args,
$self->send(@res);
}
}
- DXCommandmode::_diffms($call, $line, $t0);
+ diffms("rcmd from $user on $call", $line, $t0, scalar @res) if isdbg('progress');
});
return @out;