projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
a bit more
[spider.git]
/
perl
/
DXMsg.pm
diff --git
a/perl/DXMsg.pm
b/perl/DXMsg.pm
index 75ae1befe21a75d4ba4f48fbcaf61c284f1ae0eb..dce9c04f28f0b8df2b902ece0ba6c12d145968a9 100644
(file)
--- a/
perl/DXMsg.pm
+++ b/
perl/DXMsg.pm
@@
-636,7
+636,7
@@
sub queue_msg
# guess, use (to, from, time, subject) tuple?
foreach $dxchan (@nodelist) {
next if $dxchan->call eq $main::mycall;
# guess, use (to, from, time, subject) tuple?
foreach $dxchan (@nodelist) {
next if $dxchan->call eq $main::mycall;
- next if
grep { $_ eq $dxchan->call }
@{$ref->{gotit}};
+ next if
ref $ref->{gotit} && grep $_ eq $dxchan->call,
@{$ref->{gotit}};
next unless $ref->forward_it($dxchan->call); # check the forwarding file
# if we are here we have a node that doesn't have this message
next unless $ref->forward_it($dxchan->call); # check the forwarding file
# if we are here we have a node that doesn't have this message