X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXProt.pm;h=b775965660738029cf0e8a98385363c169652890;hb=79fe9451acd189d972624246964650447aafdb8e;hp=835d4424f7a2dbcf80607651bbf0a0d72e6f5c21;hpb=11ddef27f66f3ceb6b482c1c1f6d82d3d43576c1;p=spider.git

diff --git a/perl/DXProt.pm b/perl/DXProt.pm
index 835d4424..b7759656 100644
--- a/perl/DXProt.pm
+++ b/perl/DXProt.pm
@@ -449,13 +449,6 @@ sub process
 			}
 		}
 
-		# send out a PC92 config record if required
-		if ($main::systime >= $dxchan->{next_pc92_update}) {
-			if ($dxchan->{call} eq $main::mycall || !$dxchan->{do_pc9x}) {
-				$dxchan->send_pc92_update($dxchan->{call});
-			}
-			$dxchan->update_pc92_next($pc92_update_period);
-		}
 	}
 
 	Investigate::process();
@@ -474,6 +467,20 @@ sub process
 		}
 
 		$last10 = $t;
+
+		# send out config broadcasts
+		foreach $dxchan (@dxchan) {
+			next unless $dxchan->is_node;
+
+			# send out a PC92 config record if required for me and
+			# all my non pc9x dependent nodes.
+			if ($main::systime >= $dxchan->{next_pc92_update}) {
+				if ($dxchan->{call} eq $main::mycall || !$dxchan->{do_pc9x}) {
+					$dxchan->send_pc92_update($dxchan->{call});
+				}
+				$dxchan->update_pc92_next($pc92_update_period);
+			}
+		}
 	}
 
 	if ($main::systime - 3600 > $last_hour) {