]> scm.dxcluster.org Git - spider.git/commitdiff
Merge branch 'test' of ssh://server/scm/spider into test
authorDirk Koopman <djk@tobit.co.uk>
Tue, 4 Feb 2025 13:11:11 +0000 (13:11 +0000)
committerDirk Koopman <djk@tobit.co.uk>
Tue, 4 Feb 2025 13:11:11 +0000 (13:11 +0000)
1  2 
Changes
perl/DXProt.pm
perl/DXProtHandle.pm
perl/Filter.pm

diff --cc Changes
index 9235a7478b54e3912c6b6eefb83c8bdccca1bc95,2ab22dfe09b15b7a13ca60a15b6748773849c3aa..0ff7901396681e9e4811c3428b4d7d44186d1fe9
+++ b/Changes
@@@ -1,5 -1,3 +1,5 @@@
- 03Jan25======================================================================
++03Feb25======================================================================
 +1. Filter cleanup (especially filter debugging)
  31Jan25======================================================================
  1. Fixed botched node link initialisation check. This what prevent ann/full
     working and would have stopped talk, rcmd etc etc. 
diff --cc perl/DXProt.pm
Simple merge
Simple merge
diff --cc perl/Filter.pm
index 53b7d64b498233ab4e020a95130982fe892d63ca,40f7b59cf80b36ca519e2ca20fe6b66bc05df31d..0c0901fe9bb0bc552bf0146ccdb6d06c1ff9a746
@@@ -251,14 -252,10 +251,13 @@@ sub i
        my $key;
        my $type = 'Dunno';
        my $asc = '?';
 -
 -      my $r = @keys > 0 ? 0 : 1;
 -      my @tests;
        
-       
 +      my $r = 1;
 +      my $reason = '';
 +      my $hit = undef;
 +      my $true = 'PASS';
 +   
 +
        foreach $key (@keys) {
                $filter = $self->{$key};
                if ($filter->{reject} && exists $filter->{reject}->{code}) {