projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
log agw port on connection
[spider.git]
/
perl
/
DXCommandmode.pm
diff --git
a/perl/DXCommandmode.pm
b/perl/DXCommandmode.pm
index 6eee5d457cc00aca7b0ea6143a96dca280df4d0b..eae67c7237024a85fb8a3b396731b727d39a6a04 100644
(file)
--- a/
perl/DXCommandmode.pm
+++ b/
perl/DXCommandmode.pm
@@
-87,7
+87,9
@@
sub start
my $name = $user->{name};
# log it
my $name = $user->{name};
# log it
- my $host = $self->{conn}->{peerhost} || "unknown";
+ my $host = $self->{conn}->{peerhost};
+ $host ||= "AGW Port #$self->{conn}->{agwport}" if exists $self->{conn}->{agwport};
+ $host ||= "unknown";
Log('DXCommand', "$call connected from $host");
$self->{name} = $name ? $name : $call;
Log('DXCommand', "$call connected from $host");
$self->{name} = $name ? $name : $call;