projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
new style disconnect
[spider.git]
/
perl
/
DXLogPrint.pm
diff --git
a/perl/DXLogPrint.pm
b/perl/DXLogPrint.pm
index b16d69e4c055b38406c7a52c30972acea6f2900f..ded2f6186a783e27eb865a1eb02d1309efa2c308 100644
(file)
--- a/
perl/DXLogPrint.pm
+++ b/
perl/DXLogPrint.pm
@@
-116,12
+116,13
@@
sub print_item
my $s = 'undef';
if ($r->[1] eq 'rcmd') {
my $s = 'undef';
if ($r->[1] eq 'rcmd') {
+ $r->[6] ||= 'Unknown';
if ($r->[2] eq 'in') {
$r->[5] ||= "";
if ($r->[2] eq 'in') {
$r->[5] ||= "";
- $s = "
$r->[4] (
priv: $r->[3]) rcmd: $r->[5]";
+ $s = "
in: $r->[4] ($r->[6]
priv: $r->[3]) rcmd: $r->[5]";
} else {
$r->[4] ||= "";
} else {
$r->[4] ||= "";
- $s = "$r->[3] reply: $r->[4]";
+ $s = "$r->[3]
$r->[6]
reply: $r->[4]";
}
} elsif ($r->[1] eq 'talk') {
$r->[5] ||= "";
}
} elsif ($r->[1] eq 'talk') {
$r->[5] ||= "";