projects
/
spider.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
5c037bc
)
strip off extra brackets in pc61 ip storage
author
Dirk Koopman
<djk@tobit.co.uk>
Mon, 27 Apr 2020 18:47:30 +0000
(19:47 +0100)
committer
Dirk Koopman
<djk@tobit.co.uk>
Mon, 27 Apr 2020 18:47:30 +0000
(19:47 +0100)
perl/DXProtHandle.pm
patch
|
blob
|
history
diff --git
a/perl/DXProtHandle.pm
b/perl/DXProtHandle.pm
index 9921d8289d1ad5aed3e3753eae91f18f67fe3fab..0c71e5900d96d3fb5ebd3a01360993d92be8ba05 100644
(file)
--- a/
perl/DXProtHandle.pm
+++ b/
perl/DXProtHandle.pm
@@
-241,7
+241,7
@@
sub handle_11
}
if (isdbg('progress')) {
- my $sip = $ip ? sprintf "($ip$implied)" : '';
+ my $sip = $ip ? sprintf "($ip$implied)" : ''
unless $ip =~ m|[\(\)\*]|
;
my $s = sprintf "SPOT: $spot[1] on $spot[0] \@ %s by $spot[4]$sip\@$spot[7]", cldatetime($spot[2]);
$s .= " '$spot[3]'" if $spot[3];
dbg($s);