projects
/
spider.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
a152a29
)
fix error on disconnect in RBN + seeme
author
Dirk Koopman
<djk@tobit.co.uk>
Mon, 31 Jan 2022 18:33:58 +0000
(18:33 +0000)
committer
Dirk Koopman
<djk@tobit.co.uk>
Mon, 31 Jan 2022 18:33:58 +0000
(18:33 +0000)
perl/RBN.pm
patch
|
blob
|
history
diff --git
a/perl/RBN.pm
b/perl/RBN.pm
index 9d17d33bddfd597bf6318f0e1b2ec263d2f0cf8d..87cedaa71c73447a78d174e988094f6aeff08897 100644
(file)
--- a/
perl/RBN.pm
+++ b/
perl/RBN.pm
@@
-980,7
+980,7
@@
sub del_seeme
my $call = shift;
my $base = basecall($call);
my $ref = $seeme{$base};
- return unless @$ref;
+ return unless
$ref &&
@$ref;
@$ref = grep {$_ ne $call} @$ref;
if (@$ref) {