X-Git-Url: https://ruin.nu/git/?p=NDIRC.git;a=blobdiff_plain;f=Delling.pm;fp=Delling.pm;h=c6df7f24b7c5f9d5fb64f786ae7260592b4e6e24;hp=c6d06fa1ac500ccaf92e14c5efed3476c99bb5b1;hb=410507b62593ec8cc527567ce44b2be347352df7;hpb=d43083661d814e3ef6d92a29fb2501515e429d71

diff --git a/Delling.pm b/Delling.pm
index c6d06fa..c6df7f2 100644
--- a/Delling.pm
+++ b/Delling.pm
@@ -149,11 +149,19 @@ sub refresh {
 		SET sent = TRUE WHERE id = ANY($1)
 		});
 	$scans->execute;
+	my @scanreqs;
 	while (my $scan = $scans->fetchrow_hashref){
 		$self->message("($scan->{coords} $scan->{type})"
 			." http://game.planetarion.com/showscan.pl?scan_id=$scan->{scan_id}"
 			, @{$scan->{nick}});
 		$sentscan->execute($scan->{id});
+		push @scanreqs, @{$scan->{id}};
+	}
+
+	if (scalar @scanreqs > 0)
+	{
+		my $scanreqs =  join(', ', @scanreqs);
+		$self->toTarget(scan => "Handled the following requests: $scanreqs");
 	}
 
 	my @row = $dbh->selectrow_array(q{SELECT tick(), max(tick) FROM planet_stats});