X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=Scans.pm;h=76c1e0534f41eaf71d4e87b9c69441ed5ac1cd2d;hb=ccb4338b25220a94114da1bdf5d5d0345c885b06;hp=ccdc1f34d96c9189dce1919cfd8aa906b1951a11;hpb=ce53b2c4f6aaa57596f9fe28260219456ada4bc2;p=NDIRC.git

diff --git a/Scans.pm b/Scans.pm
index ccdc1f3..76c1e05 100644
--- a/Scans.pm
+++ b/Scans.pm
@@ -28,7 +28,7 @@ our @ISA = qw/Exporter/;
 our @EXPORT = qw/addScan addScanGroup sendScan/;
 
 sub addScan {
-	my ($id,$verbose) = @_;
+	my ($id,$verbose, $quiet) = @_;
 	if (1){
 		unless ($ND::DBH->selectrow_array(q{SELECT scan_id FROM scans WHERE NOT groupscan AND scan_id = ? AND tick >= tick() - 168},undef,$id)){
 			my @user = $ND::DBH->selectrow_array(q{SELECT uid,username, scan_points, tick() 
@@ -38,7 +38,12 @@ sub addScan {
 				if (@user){
 					$ND::DBH->do('UPDATE users SET scan_points = scan_points + 1 WHERE uid = ? ',undef,$user[0]);
 					$user[2] += 1;
-					$ND::server->command("msg $ND::target Added scan, at tick $user[3]. $user[1] points now $user[2]");
+					if ($quiet){
+						$ND::server->command("msg $ND::target Added scan, points now $user[2]");
+					}
+					else{
+						$ND::server->command("msg $ND::target Added scan, at tick $user[3]. $user[1] points now $user[2]");
+					}
 				}elsif ($verbose){
 					$ND::server->command("msg $ND::target Added scan, but unknown user, no points");
 				}